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I.  Introduction 

This  manual  is  a description  of  the  semantic  definition 
metalanguage  known  as  SEMANOL(76).  It  is  intended  to  be  as 
complete  and  precise  a description  of  SEMAHOL(76)  as  can  be 
achieved  using  English.  It  is  not  a tutorial;  it  presupposes 
considerable  familiarity  with  the  underlying  ideas  of 
SEMAN0L(76) . 

The  presentation  is  in  a "top-down"  sequence  — manv 
structures  are  defined  in  terms  of  structures  not  yet  defined; 
thus  it  is  intended  for  use  by  experienced  (or  at  least  well 
versed)  SEMANOL(76)  programmers. 

The  manual  itself  consists  of  three  chapters,  including 
this  Introduction.  Chapter  II  consists  of  a basic  description 
of  the  elements  of  SEMAN0L(76)  programs.  Details  regarding  the 
Translator  conventions  will  be  listed  here  as  well. 

Chapter  III  consists  of  the  full  SEMANOL(76)  language 
description.  The  grammar  will  be  used  as  a guide  to  >.he 
development  of  the  chapter.  Thus  it  is  again  assumed  that  the 
reader  has  basic  familiarity  with  the  SEMANOL(76)  notation  for 
grammars . 
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II.  General  Overview 


A.  SEMAN0L(76)  program  structure 

A SEMAN0L(76)  program  may  contain  four  sections,  each 
consisting  of  a sequence  of  basic  constructs. 

The  Declarations  section  consists  of  a collection  of 
declarations,  by  which  Syntactic  components  and  Global 
variables  can  be  identified. 

The  Context  free  syntax  section  contains  a collection  of 
Syntactic  definition"^  which  are  used  to  specify  an  (almost) 
context  free  grammar  for  a language  (i.e.  a set  of  strings) 
over  the  ASCII  character  set.  Actually,  several  possibly 
independent  grammars  can  be  included  in  this  section.  Each 
syntactic  definition  serves  to  identify  a set  of  strings  with  a 
syntactic  class  name,  which  can  then  be  used  in  several  ways  in 
SEMAN0L(76) . Any  syntactic  class  name  may  be  used  as  the  start 
symbol  for  a grammar. 

The  Semantic  definitions  section  contains  Semantic 
definitions , which  are  operationally  similar  to  function 
declarations  in  other  programming  languages.  Semantic 
definitions  consist  of  a Semantic  definition  name  followed  by 
an  optional  Dummy  parameter  li'sT  followed  by  a Semantic 
definition  body.  A semantic  definition  may  be  "functional"  or 
"procedural";  i.e.,  it  specifies  the  selection  of  a SEMANCL(76) 
expression  which  is  to  be  evaluated  ( functional ) , or  it 
specifies  a sequence  of  Statements  which  are  to  be  executed  in 
order  ( procedural ) . Semantic  definitions  may  be  directly  or 
indirectly  recursive . 

The  Control  section  contains  a list  of  statements  exactly 
like  those  in  procedural  semantic  definitions;  the  statements 
are  to  be  executed  in  order.  Statements  may  contain  semantic 
definition  references  within  them  — in  most  reasonable 
SEMANOL(76)  programs  at  least  one  statement  will  have  such  an 
imbedded  reference.  At  least  one  such  statement  must  appear 
here  to  begin  the  interpretation.  In  practice,  several  are 
used  to  specify  the  major  steps  in  the  interpretation  of  a 
program  in  the  object  language. 


2 


StMANOL(76)  Reference  Manual 
II.  General  Overview 


B.  Evaluation  description 

The  evaluation  of  a SEMAN0L(76)  program  can  be  described  on 
a formal  or  symbolic  basis;  i.e.,  the  SEMANOL(76)  operations 
are  performed  on  certain  constants  for  underlying  objects, 
producing  new  constants  standing  for  other  objects. 

In  this  manual,  a less  formal  description  method  is  used  in 
which  evaluation  is  described  as  the  process  of  scanning  the 
text  of  the  SEMAN0L(76)  program  and  producing  objects  which 
serve  as  the  values  of  expressions. 

For  example,  the  SEMANOL(76)  expression  "a  //CS  b”  where  a 
and  b are  SEMANCL(76)  expressions  would  be  evaluated  as 
follows:  evaluate  a — i.e.  create  the  object,  3,  specified  by 

a;  evaluate  b similarly;  evaluate  //CS  by  finding  the  sequence 
concatenation  operator  denoted  by  //CS  and  applying  it  to  3 and 
D to  form  a resultant  object,  say  C. 

If  the  expression  x is  a primitive  constant  then  the  value, 
*,  of  X is  the  object, 

8,  denoted  by  the  constant. 

[NOTATION:  The  "hat",  “ , symbol  is  used  to  designate 
the  object  or  function  or  relation  denoced  by  a constant,  and 
the  "tilde",  ~ , is  used  to  designate  the  value  of  an 
expression.  However,  we  may  also  write  of  the 
function,  9,  using  the  phrase:  the  "x"  function.] 

SEMAN0L(76)  programs  are  executed . The  process  of  execution 
associates  values  with  expressions  in  the  SEMANOL(76)  program. 

StMANOL(76)  expressions  are  built  up  from  object,  function, 
and  relation  constants,  and  names,  with  precedence  rules 
implied  in  the  normal  manner  by  the  official  SEMANOL(76) 
grammar . 

SEHANGL(76)  syntactic  expressions  are  used  to  form  context 
free  grammars,  and  are  discussed  elsewhere. 

SEMANOL(76)  semantic  expressions  are  evaluated  in  the 
manner  described  below: 


Ih 

names 
name 
name , 
or  a 
appear 


e simplest  expressions  consist  of  object  constants  or 
alone.  The  evaluation  of  a name  depends  upon  whether  the 
is  a syntactic  definition  name,  a semantic  definition 
a declared  global  variable  name,  a dummy  parameter  name, 
dummy  variable  name.  Syntactic  definition  names  can  only 
in  more  complex  semantic  expressions  (keyword 
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expressions,  discussed  below)  and  the  semantics  of  their 
evaluation  depends  upon  the  keyword  expression  in  which  they 
appear . 

Semantic  definition  names  may  appear  with  or  without  an 
actual  argument  expression  list,  and  are  termed  "semantic  def 
calls",  "y/PKOC-DF  calls",  or  "#DF  calls";  evaluation  of  such 
calls  is  analogous  to  function  calls  in  most  algebraic 
languages  and  is  discussed  in  Chapter  III  in  the  discussion  of 
Semantic-definitions. 


i The  evaluation  of  a declared  global  variable  name,  x,  in  a 

semantic  expression  is  synonymous  with  the  evaluation  of 
"//LATEST-VALUE  (' X ')" ; i.e.,  the  result  value  is  the  latest 

I value  assigned  to  "x"  in  the  global  assignment  sequence  (see 

Section  D,  "Global  assignment  sequence",  below). 

■ The  evaluation  of  a dummy  parameter  name  (of  a semantic 

definition)  produces  as  a result  the  value  of  the 
I corresponding  actual  argument  expression  in  the  invoking 

semantic  def  call  (see  the  discussion  of  Semantic-definitions 
j in  Chapter  III). 

i Dummy  variable  names  appear  in  the  scope  defined  by  a 

) high-level-iterator,  discussed  below.  The  value  of  any  such 

dummy  name  (upon  evaluation  of  the  expression  in  which  it 
appears)  is  determined  by  the  semantics  of  the  specific 
high-level-iterator,  as  discussed  in  detail  in  Chapter  III. 
Also  see  the  last  paragraph  of  this  section. 

f 1 In  addition  to  names,  a SEMANOL(76)  expression  may  include 

• ! function  constants,  which  are  function  keywords  such  as  "+", 

n.it^  t.«i.  ^ "/MbS",  iKTH-ELEMENT-IN" , etc.;  each  denotes  a 
specific  function  which  has  a certain  number  of  arguments,  and 
I these  arguments  are  represented  in  the  SLMANOL(76)  program  by 

^ ( sub)expressions  called  "operand  expressions"  of  the  function 

keyword  or  operator  constant. 

Each  step  in  the  evaluation  of  a complicated  expression 
involves  the  application  of  one  function  constant  to  its 
operand  fexpressions . We  call  the  expression  being  evaluated  at 
this  step’s  keyword  expression. 

Normally,  the  rule  for  evaluating  a keyword  expression  is 
the  call-by-value  rule  discussed  above.  That  is,  the  operand 
expression( s ) are  evaluated,  left  - to  - right,  creating 
; argument(s)  as  value(s);  the  function  denoted  by  the  function 

I keyword  is  applied  to  the  argument(s),  yielding  a new  object  as 

' the  result  value  of  the  keyword  expression. 
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Some  keywords  are  evaluated  in  a (partial)  call-by-name 
fashion  --  these  include  the  high-level-iterator  keywords . Tn 
these  cases,  one  of  the  operand  expressions  (usually  the  last) 
is  passed  to  the  function  as  an  argument  --  the  operand 
expression  is  not  evaluated  first.  Then  the  function  itself 
may  call  for  evaluation  of  the  operand  expression  or  some 
modified  version  of  it. 


C.  SEMANCL(76)  Data  Types 

The  objects  which  can  be  values  of  SEMAN0L(76)  expi essions 
may  be  partitioned  into  five  classes  called  Primary  data  types; 

-Boolean  objects:  <true>  and  <false>; 

-Undefined  objects:  <undefined>; 

-String  objects; 

-Sequence  objects; 

-Parse  tree  or  Node  objects; 

Boolean,  undefined  and  string  objects  are  said  to  be 
unstructured  or  simple  objects;  sequence  and  parse  tree  objects 
are  said  to  be  structured  objects.  The  elements  of  a sequence 
may  be  objects  of  any  type;  the  parse  tree  objects  are 
constructed  of  Nodes,  and  any  parse  tree  is  uniquely 
represented  by  its  Root  node.  Furthermore,  any  node  is  the 
root  node  for  some  unique  parse  tree.  Thus  to  say  that  an 
object  is  a parse  tree  is  in  some  sense  equivalent  to  saying 
that  the  object  is  a node.  The  SEMANOL(76)  interpreter 
represents  a parse  tree  by  its  root  node. 

In  addition,  there  are  two  SEMANOL(76)  functions,  <stop> 
and  <error>  (denoted  by  #STOP  and  //ERROR),  which  when  invoked 
during  evaluation,  cause  evaluation  to  stop;  in  the  case  of 
<error>,  an  error  message  is  written  on  a standard  output  file. 
We  will  sometimes  speak  of  expressions  denoting  or  producing 
the  value  <error>  (or  <stop>)  which  is  the  same  as  saying  that 
the  function  <error>  (or  <stop>)  is  invoked  in  the  evaluation 
process . 

Since  the  evaluation  of  expressions  causes  the  construction 
of  objects  from  the  above  five  data  types,  expressions  are  said 
to  have  the  type  of  the  object  which  is  created  upon  their 
evaluation.  Thus  we  may  speak  of  "string  expressions",  etc. 
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The  classification  of  SEMANOL(76)  objects  into  primary  data 
types  is  based  upon  the  SEMANUL(76)  functions.  Every  function 
accepts  0 or  more  arguments,  each  an  object  of  one  of  the  data 
types.  A function  constant  is  said  to  accept  its  operand 
expressions  iff  its  function  accepts  the  arguments  obtained  by 
evaluating  the  operand  expressions. 

In  many  cases,  if  a function  accepts  an  object  of  type  a as 
its  n-th  argument,  it  will  not  accept  an  object  of  type  b (b 
not  equal  to  a)  as  that  argument.  This  rule  is  relaxed  in 
certain  cases.  Some  functions  will  accept  arguments  of  any 
type.  Others  will  nominally  accept  only  string  arguments — for 
these,  however,  node  arguments  are  accepted  by  convention,  and 
the  operator  denoted  by  the  keyword  "//STRING-OF-TERMINALS”  is 
implicitly  applied  to  convert  the  node  to  its  string  of 
terminals  before  evaluation  of  the  function  itself. 

Certain  functions  will  accept  only  a subset  of  the  strings 
those  having  a certain  (numeric)  syntax.  Thus  a collection 
of  secondary  data  types  (or  syntactic  or  numeric  data  types)  is 
induced ; 


-Bit  string; 


-Integer  numeral; 

The  allowable  syntax  for  members  of  each  data  type  is  given 
in  Chapter  III.  Certain  function  constants  will  accept  only 
bit-string  expressions  (e.g.  //BGK,  #DXOR),  others  will  accept 
only  integer  expressions  (e.g.,  +,  -,  //SUBSTRING-OF-CHARACTERS 
m #T0  n //OF  s (for  operand  expressions  m and  n)  , etc. 


<error> 

Each  function  has  0 or  more  arguments  and,  given  those 
arguments,  produces  an  object  of  one  of  the  data  types  listed 
above.  Each  operator  accepts  for  each  argument  a SEMANOL(76) 
object  from  one  of  the  data  types  listed  above.  If  during  the 
execution  of  a SEMAN0L(76)  program,  an  object  is  used  as  an 
argument  and  the  object  is  not  of  the  correct  type,  the 
operator  does  not  accept  the  argument  and  produces  the  value 
<error>,  which  causes  immediate  termination  of  the  execution  of 
the  SEMAN0L(76)  program. 

The  keyword  #CONTEXT-FREE-PARSE-TKEE  will  accept  as  its 
first  operand  any  SEMANOL(76)  expression  denoting  a string,  and 
as  its  second  operand  a Syntactic  class  name  which  is  the  start 


6 


SEMAN0L(76)  Heference  Nianual 


II.  General  Overview 


symbol  for  an  unambiguous  grammar.  However,  it  is  impossible 
to  test  the  grammar  for  ambiguity  a priori;  therefore,  a 
grammar  can  be  established  as  •’mbiguous  only  when  a parse  is 
attempted  for  the  given  string;  in  this  case  the  keyword 
expression  evaluates  to  <error>.  For  a different  given  string 
the  same  grammar  may  provide  for  an  unambiguous  parse;  in  this 
case  the  operator  constructs  the  parse  tree  which  results  from 
the  parse.  For  another  string,  the  same  grammar  may  admit  no 
parse  at  all;  in  this  case  the  result  would  be  <undefined>. 


D.  Global  assignment  sequence 

An  executing  SEMANOL(76)  program  can  manipulate  a structure 
called  the  Global  assignment  sequence  which  can  be  thought  of 
as  a sequence  of  pairs  (3,V),  where  S is  a string  called  the 
receiving  string  (or  global  SEMANOL(76)  variable)  and  9 is  a 
value  of  any  legal  SEMANOL(76)  data  type.  The  primary 
operators  which  manipulate  the  global  assignment  sequence  are 
denoted  by  #ASSIGN-LATEST-VALUE (s , v ) , and  #LATEST-VALUE(s) . 

The  value  of  the  expression  "//ASSIGN-LATEST-VALUE  ( s , v ) " is 
the  empty  string;  as  a side  effect  of  the  evaluation  of  this 
keyword,  the  pair  (S,V)  is  added  to  the  global  assignment 
sequence . 

The  value  of  "#LATEST-VALUE(s) " is  the  9 in  the  first  pair 
(S,9)  found  on  a reverse  order  search  through  the  global 
assignment  sequence  at  the  time  of  evaluation  of  the  keyword. 
If  the  search  fails  to  find  such  a pair,  the  value  is 
<undef ined> . 

Note  that  the  "receiving  string"  may  be  designated  by  any 
SEhANOL(76)  string  expression.  Thus,  the  set  of  receiving 
strings  employed  in  the  execution  of  a SEMANOL(73) 
specification  may  not  be  fixed  at  the  start  of  execution; 
during  execution,  new  ones  may  be  constructed  whose  form  depend 
upon  the  object  program  and  its  input. 

An  abbreviation  for  the  two  basic  assignment  operators  is 
available  in  SEHANOL(76),  using  declared  global  variables.  A 
receiving  string  which  has  the  syntax  of  a SEMANOL(76)  name  may 
be  declared  a global  variable.  Such  a name  must  appear  in  a 
"#DECLAKE-GLGBAL"  declaration.  Then  it  may  appear  in  a 
(semantic)  expression;  it  may  also  appear  as  the  assigned-to 
variable  immediately  after  the  "#ASSIGN-VALUE ! " of  a 
SLhAMOL(76)  assignment  statement. 

If  a declared  global  variable  name  (say  x)  appears  in  any 
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semantic  expression  it  is  an  abbreviation  for  the  semantic 
expression  "#LATEST-VALUE(  ' x ' . The  statement  "//ASSIGN-VALUE! 

s semantic-expression"  is  an  abbreviation  for  the  statement 
il^COMPUTE!  #ASSIGN-LATEST-VALUE  ('x',  semantic-expression)”. 

The  following  points  should  be  noted: 

-Writing  a declared  global  variable  is  then  a matter 
of  writing  the  receiving  string  itself,  rather  than  a 
SEMANOL(76)  expression  whose  value  is  the  string. 

-When  the  declared  global  variable  mechanism  is  being 
used,  two  methods  may  be  used  interchangeably  to 
establish  the  latest  value:  (1)  writing  the  declared 
global  variable  alone,  or  (2)  using  the  //LATEST-VALUE 
keyword  with  the  receiving  string  enclosed  in  primes. 

-Thus  in  the  SEMANOL(76)  expressions  below: 

" 'AB'  //CW  'CD'  " denotes  the  string  "ABCD"; 

" 'AB'  #CW  CD  " denotes  the  string  "ABEF"  if  CD  is  a 
declared  global  variable  and  ilfLATEST-VAHJE ( ' CD ' ) 
denotes  the  string  "EF"  (i.e.,  if  " 'AB'  //CW 

//LATEST-VALUE( 'CD' ) " denotes  "ABEF"). 

-When  the  declared  global  variable  mechanism  is  being 
used,  setting  a new  latest-value  for  a given 

receiving  string  may  be  done  either  (1)  via  the 
"//ASSIGN-VALUE!..."  statement  (writing  the  declared 
global  variable  itself  as  the  receiving  string)  or 
(2)  via  the  "// ASSIGIi-LATESl-VALUE"  keyword  expression 
with  the  receiving  string  in  string  quotes  (or 
denoted  by  a more  complicated  string  expression). 
Note  that  method  (1)  may  only  be  used  in  procedural 
semantic  definitions  or  in  the  control  commands 
section,  while  method  (2)  may  be  used  in  any 
SEMAMOL(76)  expression.  This  limitation,  as  well  as 
the  need  to  know  the  receiving  string  a priori, 

tends  to  limit  the  use  of  declared  global  variables 

to  retaining  control  related  information  which  is 
independent  of  individual  object  programs. 

-The  use  of  declared  global  variables  is  subject  to 
certain  context-sensitive  syntactic  constraints  in  a 
SEMAN0L(76)  program:  the  variable  names  must  not 
conflict  with  any  other  names  (see  SEMANOL(76) 
names).  The  purpose  of  the  "//DECLARE-GLOBAL" 
declaration  is  to  identify  the  variable  name  as  a 
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E.  SEMAN0L(76)  Names 

A unique  name  must  be  used  for  each  syntactic  and  semantic 
definition  name  and  declared  global  variable  name.  Definition 
and  global  variable  names  are  collectively  called  global  names. 
Each  global  name  can  be  given  to  at  most  one  of  the  definitions 
and  global  variables. 

Names  used  for  semantic  definition  dummy  parameter  names 
and  for  dummy  variable  names  in  such  things  as  "//FOR-ALL . . . ” 
loops  are  called  local  names.  The  set  of  local  names  must  be 
distinct  from  the  global  names. 

Each  dummy  parameter  and  dummy  variable  has  a scope.  For 
example,  the  scope  of  a semantic  definition  dummy  parameter 
begins  with  "#DF"  and  ends  with  the  closing  "/(*."  of  the 
definition.  The  scope  of  a "//FOR-ALL . . . " statement  dummy 
variable  is  the  <Compound-statement> . 

The  same  local  name  cannot  be  used  for  any  two  dummy 
parameters  or  variables  which  have  overlapping  scopes. 
Otherwise,  local  names  need  not  be  distinct. 

The  global  assignment  sequence  is  completely  independent  of 
all  local  variables.  Thus,  no  variables  with  a local  name 
(e.g.,  dummy  variables  of  high-level-iterators)  can  ever  be 
explicitly  assigned  a value  via  the  "//ASSIGN-VALUE!..."  or 
"//ASSIGN-LATEST-VALUE.  . . " operators. 


F.  Sequences  and  parse  trees 


The  structured  objects  called  sequences  are 
general  nature:  their  elements  can  be  objects  of  an 
SEMANCL(76)  data  type,  including  sequences. 
SEMAN0L(76)  sequences  may  not  be  re-entrant  (i.e., 
sequence  elements  of  a sequence  may  be  the  sequence 
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may  any  elements  of  the  (sequence)  elements  of  the  sequence  be 
the  sequence  itself,...  etc.). 

Suppose,'  two  separate  evaluations  produce  X and  y,  each  of 
which  is  a sequence.  If  ''#LENGTH(x)  = #LENGTH(y)''  and  "i 
#TH-ELEMENT-IN(x)  //EQ  i #TH-ELEMENT-IN ( y ) " for  all  i such  that 
" 1 <=  i”  and  "i  <=  #LENGTH(x)",  then  X is  identical  to  y.  That 
is,  the  identity  of  a sequence  is  completely  determined  by  the 
order  and  identity  of  its  components.  Here  the  notion  of 
identity  is  defined  in  terms  of  the  SEMAN0L(76)  operators  for 
equality  (the  node-,  sequence-,  string-,  and  numeric-equality 
relations) . 

Every  SEMANOL(76)  parse  tree  is  uniquely  represented  by  its 
root  node;  however,  parse  trees  are  not  necessarily  disjoint. 
A parse  tree  3 "includes”  parse  tree  D if  every  node  contained 
in  D is  contained  in  3.  Also  3 "properly  includes"  B if  S 
includes  D and  there  is  some  node  contained  in  3 but  not  in  B. 
A parse  tree  is  "most-inclusive"  if  it  is  not  properly  included 
in  any  parse  tree.  All  most-inclusive  parse  trees  are  disjoint 
(they  contain  no  nodes  in  common);  any  two  (sub)trees,  3 and  B, 
both  included  in  a most-inclusive  tree,  have  the  property  that 
either  3 properly  includes  B or  B properly  includes  3 or  3 is 
identical  to  B. 

Each  result  of  the  "#CONTEXT-FKEE-PARSE-TREE"  function  is 
(the  root-node  of)  a unique  most-inclusive  parse  tree;  given 
any  node  in  a most-inclusive  parse  tree,  any  nther  node  in  the 
tree  can  be  obtained  by  composing  certain  SEMANOL(76) 
functions.  Any  node  is  the  root  node  of  a parse  tree  (possibly 
a subtree  of  a most-inclusive  tree),  and  corresponds  to  a 
particular  string  in  a set  defined  in  the  context-free  syntax 
section;  that  string  can  be  obtained  via  the 
"#STRING-OF-TEhMINALS-OF"  function. 


G.  SEMAN0L(76)  Execution  rules  — general 

Execution  of  a SEMANOL(76)  program  begins  with  the  first 
statement  in  the  Control  section.  When  execution  of  that 
statement  is  completed  the  next  sequential  statement  is 
executed;  execution  proceeds  in  this  sequence  unless  the 
instruction  list  is  exhausted,  in  which  case  execution 
terminates,  with  a standard  error  message. 

Each  statement  is  executed  according  to  the  semantics 
specified  in  Chapter  III  of  this  manual.  Normally  this  will 
involve  the  evaluation  of  a SEMANCL(76)  expression;  the  precise 
rules  of  construction  for  SEMAN0L(76)  expressions  and  rules  of 
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evaluation  are  given  in  Chapter  III  also.  (A  general 
discussion  appears  in  this  chapter,  Section  B,  "Evaluation 
description",  above.) 


H.  SEMAN0L(76)  Arithmetic 

Certain  arithmetic  functions  are  performed  on  numeric 
(string)  values  to  produce  new  numeric  values.  It  is  important 
to  note  that  the  a'  gument  and  result  objects  are  always 
strings,  albeit  strings  with  a special  syntax  (as  described  in 
Section  "SEMANOL(76)  Data  Types”  above).  However  in  many 
cases  they  may  be  thought  of  most  naturally  as  numbers  (for 
example,  "37  + 21"  evaluates  as  follows:  construct  the  argument 
strings  "37”  and  "21"  and  apply  the  "+"  operator,  which 
produces  the  result  value--also  a string — "58"). 

Numerals  must  be  strings  which  satisfy  the  syntax  given  in 
Chapter  III  for  <Numer ic-constant> . Integer  numerals  consist 
of  an  "integer  portion"  possibly  followed  by  a base  suffix. 
(Negative  integer  numerals  have  a leading  minus  sign.) 

bit  string  numerals  consist  of  a (binary)  "integer  portion" 
followed  by  a "//BITS"  suffix. 

Each  integer  arithmetic  operator  produces,  as  a result,  an 
integer  numeral  of  base  10,  8,  or  2.  To  define  these  operators 
uniquely,  a standard  form  numeral  must  be  defined  for  each  of 
these  classes,  which  is  the  form  of  all  result  values  of  the 
arithmetic  operators. 


( 1 ) Standard  form  numerals 

A non-zero  numeral  string  is  in  standard  form  if  the 
leading  zeros  are  suppressed  in  the  constant. 

Standard  form  zeros  are: 

Integers 


0 

0//B8 


0//B2 
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(2 ) SiRn-magnitude  notation 

The  arithmetic  operations  can  be  defined  formally  as  string 
operations,  but  we  shall  use  a less  formal  means  in  this 
manual,  referring  to  the  underlying  numbers  obviously  denoted 
by  the  SEMANOL(76)  numeral  strings.  Sign-magnitude  notation 
(with  explicit  sign)  is  used  for  SEMANOL(76)  numerals. 

At  the  risk  of  belaboring  the  obvious,  the  rules  for 
defining  the  number,  X,  named  by  an  numeral  x,  are  given  in  the 
next  two  paragraphs. 

The  number  associated  with  any  integer  "Xn:::X1X0"  is  given 
by  the  polynomial  Xn*b ! n+ . . . +X  1 * ( b ) X0*(1)  where  + stands  for 
addition,  • stands  for  multiplication,  ! stands  for 
exponentation  and  b is  the  base  of  the  numeral. 

An  unsigned  integer  numeral,  i,  denotes  the  number,  1, 
associated  with  the  integer  portion  of  i.  Thus  "IS"*  ”15#E8" 
and  "1101//B2''  all  denote  the  integer  with  decimal 
representation  ”13".  If  i has  a leading  minus  sign,  1 is 
negated  ("-1101//D2"  denotes  the  integer  with  decimal 
representation 


( 3 ) General  Notes  on  Arithmetic 


Integer  arithmetic  operators  accept  base  2,  8,  or  10 
arguments  interchangeably.  If  the  operators  are  binary 
arithmetic  operators  such  as  +,  -,  * or  /,  the  result  is  in  the 
minimal  base  among  the  arguments  if  the  bases  of  the  arguments 
aiffer;  otherwise  the  result  is  in  the  base  of  the  arguments. 

All  integer  arithmetic  operators  produce  standard-form 
result  numerals;  this  guarantees  uniqueness. 

All  arithmetic  is  officially  of  unbounded  precision.  There 
is  no  maximum  precision  of  integer  operands  and  results,  for 
example.  (See  Section  J,  "SEMA!,0L(76)  Parameters".) 


I.  SEhAN0L(7b)  Iterators 

Each  SEMANOL(76)  iterator  consists  of  three  parts:  initial 
keyword,  iteration  control  clause,  and  iterated  clause. 
The  iterators  are  identified  by  their  initial  keyword: 
#E0H-ALL,  //WHILE  (iterator  commands),  //EOK-ALL,  //THEhE-EXISTS , 


12 


SEMAN0L(76)  Reference  Manual 
II.  General  Overview 


n #TH,  #FIRST,  //LAST,  #SUBSEQUENCE-OF-ELEMENTS , 
#SEQUENCE-OF-NODES  (iterator  expressions).  The  iteration 
control  clause  identifies  either  (1)  a control  expression  (in 
the  #WHILE  command),  or  (2)  a dummy  variable  name  and  an 
iteration  control  sequence;  the  control  sequence  may  be 
explicit  C'dummy-var  #IN  s”,  where  3 is  a sequence),  or 
implicit  ("dummy-var  //IN  n”,  where  B is  a parse  tree  node  and 
the  implied  sequence  is  the  preorder  sequence  of  nodes  in  fi; 
"dummy-var:  lb  < = dummy-var  < = ub,  where  the  implied  sequence 
is  the  sequence  of  integers:  ID,  ID  + 1,...,ab.  If  the  upper 
bound  is  deleted,  the  implied  sequence  of  integers  becomes 
infinite).  For  iterator  commands,  the  iterated  clause  has  the 
form  "#D0  compound-stmt";  for  iterator  expressions,  the  form  is 
either  "#SUCH-THAT  (bool-exp)"  or  "#IT-IS-TRUE-THAT 
( bool-exp ) " . 

The  #WHlLE  command  is  evaluated  in  the  following  manner: 

the  expression  in  the  control  clause  is  evaluated.  If  the 
result  is  (1)  <true>,  then  the  iterated  clause  is  evaluated, 
and  then  the  entire  #WHILE  command  is  re-evaluated;  (2) 
<false>,  then  the  termination  condition  has  been  achieved,  and 
control  is  given  to  the  statement  following  the  i*-erated 
clause;  (3)  any  other  value,  then  the  result  of  the  #WHILE 
command  is  <error>. 

The  other  iterators  are  evaluated  in  the  following  manner: 
the  expression ( s ) in  the  control  clause  are  evaluated  (in 
lef t-to-right  order).  If  the  implied  sequence  is  empty,  a 
default  action  is  taken:  iterator  commands  are  considered 
complete  and  control  is  given  to  the  statement  following  the 
iterated  clause;  iterator  expressions  return  a default  value 
which  depends  upon  the  particular  iterator  (e.g.,  #FOR-ALL 
returns  <true>,  #THERE-EXISTS  returns  <false>,  #FIRST  returns 
<undefined>,  //SUBSEQUENCE-OF-ELEMENTS  returns  <nilseq>). 
Otherwise,  the  compound-statement  or  boolean-expression  of  the 
iterated  clause  is  repeatedly  evaluated  until  the  termination 
condition  for  the  particular  iterator  is  achieved.  In  each 
evaluation  of  the  iterated  clause,  any  occurrences  of  the  dummy 
variable  name  are  taken  to  denote  an  element  of  the  control 
sequence;  in  the  first  iteration,  the  first  element  of  the 
control  sequence  is  denoted  by  the  dummy  variable  (except  in 
the  #LAST  iterators,  where  the  last  element  is  denoted);  in  the 
nth  iteration,  the  nth  element  is  denoted  (nth  from  the  last, 
for  #LAST) . 

For  the  #FOR-ALL  command,  and  the  #SUBSEQUENCE-OF-ELEMENTS 
and  //SEQUENCE-OF-NODES  expressions,  the  iteration  terminr^'ion 
condition  is  reached  Just  after  the  last  element  of  the  control 
sequence  has  been  denoted  in  an  iteration.  For  the  other 
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iterator  expressions,  ( n#TH,  #FIRST,  #LAST,  #FOR-ALL, 
#THERE-EXISTS)  the  termination  condition  is  reached  Just  after 
the  evaluation  of  the  iterated  clause  first  (flth  for  n#TH) 
yields  <true>.  Thus  it  may  be  the  case  that  not  all  elements 
of  the  control  sequence  are  used  as  the  denoted  value.  Since 
side  effects  may  occur  as  the  result  of  any  evaluation  of  the 
iterated  clause,  this  termination  rule  may  be  significant  in  a 
SEMAN0L(76)  specification. 

It  is  possible  for  an  iterator  to  result  in  an  <error>  in 
the  following  ways:  (1)  the  expression  evaluation ( s)  in  the 
control  clause  yield  values  inappropriate  for  the  iterator,  (2) 
evaluation  of  the  iterated  clause  yields  <error>,  and  (3) 
evaluation  of  the  iterated  clause  yields  a non-logical  value 
(i.e.,  neither  <true>  nor  <false>). 


J.  SEMAN0L(76)  Parameters 

In  this  reference  manual,  no  provision  is  made  for 
parameters  which  depend  upon  a particular  SEMANOL(76)  language 
processor.  (Such  parameters  as  bits-per-word  and 

maximum-precision-of-multiply  are  common  for  other  implemented 
languages).  Most  parameters  which  can  be  simply  characterized 
are  introduced  into  programming  language  semantics  to  allow  for 
certain  space  and  time  optimizations.  However,  the  theoretical 
and  practical  expository  benefit  of  such  parameters  in  a 
metalanguage  is  quite  doubtful.  For  this  reason,  we  have 
adopted  certain  principles. 

First,  every  SEMAN0L(76)  program  should  be  written  as  if 
there  were  no  restrictions  upon  the  resources  available  to 
represent  any  SEMANOL(76)  object,  function,  or  relation.  The 
”official"  SEMAH0L(76)  language  is  itself  defined  without  such 
restrictions;  any  "official”  SEMANOL(76)  implementation  will 
process  the  "official"  SEMANOL(76)  language.  However, 
unofficial  implementations  may  be  useful,  especially  if  the 
following  rule  is  applied:  all  limitations  will  be  expressed  in 
terms  of  a (large)  class  of  objects  rather  than  in  terms  of 
particular  objects.  For  example,  it  may  be  useful  to  limit  the 
maximum  total  number  of  string  characters  in  use  at  any  point 
in  the  execution  of  a SEMANOL(76)  program,  but  it  is  much  less 
usefel  to  limit  the  length  of  individual  strings  (by,  for 
example.  Imposing  a limit  on  the  size  of  numeral  strings  as 
arguments  of  numeric  operations). 

Note  that  there  is  no  theoretical  reason  that  such 
constraints  cannot  be  stated  more  precisely  (by,  for  example. 
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assigning  a resource  requirements  measure  to  each  SEMANOL(76) 
keyword  expression,  and  defining  the  effect  of  each  SEMANOL(76) 
operator  conditionally  upon  the  availability  of  its  required 
resources);  however,  we  feel  this  to  be  unnecessary  at  present. 
Also,  even  in  the  presence  of  limited  SEMANOL(76) 
implementations,  we  believe  that  SEMANOL(76)  programs  should  be 
written  as  if  such  constraints  were  not  present  at  all. 
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III.  Description  of  SEMANOL(76) 


This  chapter  consists  of  detailed  definitions  of  the 
SEMANOL(76)  program  constructs.  The  organization  follows  a 
"top-down"  grammar  for  the  SEMANOL(76)  language. 


A.  Format 


The  text  of  this  chapter  in  sections,  each  consisting  of  a 
portion  the  SEMANOL(76)  grammar,  followed  by  a series  of 
(Keyword  schema,  explanation)  pairs  for  the  Keywords  just 
introduced  in  the  grammar.  The  sections  of  the  text  have  the 
following  form: 


Portion  of  the  grammar 


Keyword  schema 

Explanation;  i.e.,  a description  of  the  result 
produced  by  evaluating  a keyword  expression 
having  the  format  of  the  keyword  schema. 

Next  keyword  schema 

Next  result  description. 

. . . . etc. 

(Sometimes  general  discussions  of  complex  points  are 
interspersed  with  the  (Keyword  schema,  explanation)  pairs.) 


i 
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B.  Conventions  and  notation 

The  conventions  used  in  this  chapter  are  derived  from  those 
in  Chapter  II:  if  x is  a meta  variable  standing  for  a 

SEMAN0L(76)  expression,  then 

X stands  for  the  value  of  the  expression,  and 

if  X is  a constant. 


X stands  for  the  object  denoted  by  x. 

There  are  certain  special  meta  constants  used  to  denote 
special  SEMANOL(76)  objects: 

<true>  meaning  the  boolean  value,  true; 

<false>  meaning  the  boolean  value,  false; 

<nil>  meaning  the  empty  string; 

<nilseq>  meaning  the  empty  sequence. 

We  also  use  <error>  and  <stop>  to  indicate  invocation  of 
the  error  and  stop  functions  respectively,  which  terminate  the 
evaluation  process;  the  error  function  also  causes  an  error 
indication  to  be  written  on  the  standard  error  file. 

The  notation  ”B[x]''  is  used  in  the  description  of  the  high 
level  iterator  keywords  to  designate  the  iterated  Boolean 
expression  B with  every  occurrence  of  the  dummy  variable  name 
replaced  with  x,  a constant  for  an  object  X. 

A SEMAN0L(76)  object  is  said  to  be  string  convertible  if  it 

is  a 

string  or  a parse  tree  node. 

If  X denotes  a string  convertible  object,  X,  then  the 
"string  value  of  x"  is  X if  X is  a string,  and  the  string  of 
terminals  corresponding  to  X,  if  X is  a parse  tree  node. 

Some  SEMAN0L(76)  constructs  are  defined  in  terms  of  others. 
In  some  result  descriptions  for  keyword  schemata  certain 
conditionals  will  be  written  as  SEMANOL(76)  expressions  for 
precision  or  clarity,  and  they  are  said  to  hold  if,  when 
evaluated,  they  would  return  <true>.  For  example,  the 
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expression  ”a  = b"  is  written  instead  of  a equals  D because  it 
is  more  precise  — it  means  evaluate  the  expression  "a  * b" 
according  to  the  SEMANOL(76)  evaluation  rules,  and  if  the 
result  is  <true>  then  the  condition  a equals  B is  assumed  to 
hold  and  the  condition  is  satisfied. 


I 

m 
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C.  Definitions 


SEMAN0L(76)  Program  Structure 


#DF  SEMANOL-76-program 

=>  <gap>  <Declaration-section> 
<Optional-context-free-syntax>  <gap> 

< Con t rol -sect ion > 

<Optional-semantic-def inition-section>  <gap> 

=>  <gap>  <Declaration-section> 

< Optional -context -free-synt ax > <gap> 
<Semantic-def init ion-sec tion>  <gap> 
<Control-section>  <gap>  #. 

#DF  Optional -con text -free -syntax 

=>  <#NILSET>  #U  <<gap>  <Context-f ree-syntax>>  #. 

#DF  Optional -semantic-definition-sect ion 

=>  <#NILSET>  #U  <<gap> 

<Semantic-def inition-sect ion>>  #. 


A SEMAN0L(76)  program  may  contain  four  sections,  each 
consisting  of  a sequence  of  basic  constructs. 


The  "Declarations  section"  consists  of  a collection  of 
declarations,  by  which  "Syntactic  components"  and  "Global 
variables"  can  be  identified. 
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Syntactic  definitions , which  are  used  to  specify  an  (almost)  ' 

context  free  grammar  for  a language  (i.e.  a set  of  strings) 

over  the  ASCII  character  set.  Actually,  several  possibly 
independent  grammars  can  be  included  in  this  section.  Each 
syntactic  definition  serves  to  identify  a set  of  strings  with  a 
i Syntactic  class  name,  which  can  then  be  used  in  several  ways  in 

! SEMANOL(76).  Any  syntactic  class  name  may  be  used  as  the  start 

symbol  for  a grammar. 

I 

The  Semantic  definitions  section  contains  Semantic 
definitions . which  are  operationally  similar  to  function 
declarc-tions  in  other  programming  languages.  Semantic 
definitions  consist  of  a Semantic  definition  name  followed  by 

an  optional  Dummy  parameter  list  followed  by  a Semantic 

definition  body.  A semantic  definition  may  be  functional  or  j J 

. ! procedural ; i.e.,  it  specifies  the  selection  of  a SEMANOL(76)  M 

expression  which  is  to  be  evaluated  ( functional ) , or  it  | 

specifies  a sequence  of  Statements  which  are  to  be  executed  in  j 

order  ( procedural ) . Semantic  definitions  may  be  directly  or  i 

! indirectly  recursive.  i 

i 

The  Control  section  contains  a list  of  statements  exactly 
• ' like  those  in  procedural  semantic  definitions;  the  statements 

j are  to  be  executed  in  order.  Statements  may  contain  semantic 

: I definition  references  within  them  — in  most  reasonable 

: ' SEMAN0L(76)  programs  at  least  one  statement  will  have  such  an 

imbedded  reference.  At  least  one  such  statement  must  appear  . ‘ , 

here  to  begin  the  interpretation.  In  practice,  several  are  | 

used  to  specify  the  major  steps  in  the  interpretation  of  a 
program  in  the  object  language. 

I 

The  Context  free  syntax  section  and  the  Semantic 
Definitions  section  are  optional.  The  Declarations  section  may  a 

be  empty.  Thus  the  only  absolutely  required  section  of  a 
SEMAN0L(76)  program  is  the  Control  section. 


I 
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It 


Declarations 


It 


#DF  Declaration-section 

=>  <? <Declaration>>  #. 

#DF  Declaration 

=>  <Declare-syntactic-components> 
=>  <Declare-glcbal-variables>  #. 


The  "Declarations  section"  consists  of  a collection  of 
declarations,  by  which  "Syntactic  components"  and  "Global 
variables"  can  be  identified. 


y/DF  Declare-syntactic-components 

= > <'yyDECLARE-SYNTACTIC-COMPONENT’>  <gap>  <•:’> 
<gap>  <Semantic-def inition-name>  <gap>  </K<<Comma> 
<gap>  <Seraantic-def inition  name>  <gap>>>  <’#.*> 


Certain  semantic  definitions  may  be  declared  to  be 
"syntactic  components"  by  having  their  names  listed  in  a 
declaration  of  this  type.  To  appear  in  such  a declaration,  a 
semantic  definition  must  have  these  properties:  (1)  it  must 
take  exactly  one  argument,  (2)  it  must  in  no  way  depend  upon 
any  global  variable  or  hidden  input  variable,  or  external 
function.  This  last  qualification  is  a static  one  — i.e.,  (1) 
no  reference,  whether  or  not  it  is  actually  executable,  may 
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p appear  to  a global  variable,  or  to  ”#INPUT"  or  to 

■i  "#EXTERNAL-CALL-OF'' ; nor  (2)  may  any  semantic  definition 

I’  reference  appear  to  a semantic  definition  which  violates  this 

qualification  (parts  1 & 2). 

f Any  reference  to  a syntactic  component  definition  must  be 

( evaluated  to  have  a parse  tree  node  as  the  actual  argument;  if 

not,  the  result  of  the  reference  is  <error>. 

' These  restrictions  are  sufficient  to  guarantee  that  the 

; evaluation  of  a syntactic-component  reference  can  only  involve 

the  composition  of  SEMANOL  functions  upon  (1)  SEMANOL(76) 
j object  constants  and  (2)  the  parse  tree  containing  the  actual 

argument  node.  This  implies  that  the  result  of  every  syntactic 
component  is  a function  of  the  parse  tree  of  the  actual  , 

argument  node,  and  therefore  is  truly  syntactic  in  nature.  I 

i 

Furthermore,  the  evaluation  of  all  references  to  a 
particular  syntactic-component  with  a particular  node  argument 
' will  return  identical  results. 

; Therefore,  an  optimization  of  the  evaluation  of  SEMAN0L(76)  * 

syntactic-component  references  is  possible:  for  every 

(syntactic-component,  actual  node)  pair  the  normal  evaluation 
rules  need  be  followed  only  once  to  produce  a result  value; 
thereafter  a simple  table  lookup  can  be  used  to  determine  the 

result  value.  This  concept  is  implemented  by  associating  with  i 

each  node  on  a parse  tree  a potential  list  of  pairs,  each  of  ’ ‘ 

the  form:  (s,  ^),  where  s is  the  semantic  definition  name  of  a 
syntactic  component  and  ^ is  the  unique  result  value  of 

[evaluating  any  reference  to  the  named  syntactic-component  with 
the  node  as  argument.  A pair  (s,  V)  is  added  to  the  list  as  a 
side  effect  of  the  first  such  evaluation  of  a reference  to 
syntactic  component,  s,  with  the  node  as  argument;  every 
r subsequent  reference  to  syntactic  component,  s,  with  the  node 

I as  argument  will  be  evaluated  by  searching  the  list  of  pairs 

[ for  (s,  V)  and  returning  the  value  V. 


! ' 
I 
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??DF  Declare-global-variables 

=>  <'#DECLARE-GLOBAL'>  <gap>  <gap>  <Name>  <gap> 

</J<<Comma>  <gap>  <Name>  <gap>>>  <'#.’>  #. 


An  abbreviation  for  the  two  basic  assignment  operators  is 
available  in  SEMANOL(76),  using  "declared  global  variables".  A 
receiving  string  which  has  the  syntax  of  a SEMANOL(76)  "name" 
may  be  declared  a global  variable.  Then  it  may  appear  in  a 
(semantic)  expression;  it  may  also  appear  as  the  assigned-to 
variable  immediately  after  the  ”#ASSIGN-VALUE ! " of  a 
SEMAN0L(76)  assignment  statement. 

If  a declared  global  variable  name  (say  x)  appears  in  any 
(semantic)  expression  it  is  an  abbreviation  for  the  semantic 
expression  "#LATEST-VALUE ( ' x ' ) " . The  statement  "(/ASSIGN-VALUE! 
X = Semantic-expression"  is  an  abbreviation  for  the  statement 
"^COMPUTE!  #ASSIGN-LATEST-VALUE  (’x',  Semantic-expression)". 


E 

\ 


i 
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Ui 


Control  Statements 


f 

I ' 

I 

^ 

[ ■ 

^ tfDF  Control-section 

I =>  <'#CONTROL-COMMANDS'>  <gap>  <gap> 

<?  1<<Compound-statement>  <gap>>>  <•#.'>  #. 


i ' 


/ 


The  "Control  section"  contains  a list  of  statements  exactly 
like  those  in  procedural  semantic  definitions;  the  statements 
are  to  be  executed  in  order.  Statements  may  contain  semantic 
definition  references  within  them  — in  most  reasonable 
SEMAN0L(76)  programs  at  least  one  statement  will  have  such  an 
imbedded  reference.  At  least  one  such  statement  must  appear 
here.  In  practice,  several  are  used  to  specify  the  major  steps 
in  the  interpretation  of  a program  in  the  object  language. 

Execution  of  a SEMANOL(76)  program  begins  with  the  first 
statement  in  the  Control  section.  When  execution  of  that 
statement  is  completed  the  next  sequential  statement  is 
executed;  execution  proceeds  in  this  sequence  unless  the 
statement  list  is  exhausted,  in  which  case  execution  terminates 
with  a standard  error  message. 

Note  that  the  "RETURN-WITH-VALUE ! " statement  is  not 
syntactically  disallowed  in  the  Control  section,  but  may  not  be 
executed  in  the  Control  section  ( any  attempt  to  do  so  will 
produce  an  <error>  ) . 
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#DF  Compound-statement 

=>  <For-statement> 

=>  <'#WHILE'>  <gap>  <Boolean-expression>  <gap> 
<'#D0'>  <gap>  <Compound-statement> 

=>  <*#IF'>  <gap>  <Boolean-expression>  <gap> 
<'//THEN'>  <gap>  <Compound-statement> 

=>  <*#BEGIN'>  <gap>  <Compound-statement>  <gap> 

<$ <Compound-statement>  <gap>>>  <’#END'> 

=>  <Simple-statement>  #. 

#DF  For-statement 

=>  <For-all-clause>  <gap>  <'#D0'>  <gap> 
<Compound-statement>  #. 

#DF  For-all-clause 

= > <’ i!>FOR-ALL' > <gap>  <Name>  <gap>  <'#IN'>  <gap> 
<Sequence-expression> 

=>  <’#FOR-ALL'>  <gap>  <Name>  <gap>  <gap> 

<<Bounded-interval>  #U  <Unbounded-interval>>  #. 

#DF  Bounded-interval 

=>  <String-expresslon>  <gap>  <’<=’>  <gap>  <Name> 
<gap>  <'<=*>  <gap>  <String-expression>  #. 

IDF  Unbounded-interval 

=>  <String-expression>  <gap>  <'<=•>  <gap>  <Name> 

#. 


IFOR-ALL  X IIN  s IDO  c 

<error>  if  9 is  not  a sequence. 

Otherwise:  perform  the  following  steps  in  order. 
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(1)  Construct  a new  dummy  variable  named  x,  with 
scope  extending  throughout  c.  Construct  a 
new  dummy  variable  named  sx,  with  no  scope. 
Evaluate  s.  Assign  3 to  sx. 

(2)  If  3 is  <nilseq>,  the  empty  sequence,  go 
immediately  to  the  statement  following  c. 
(Halt  on  <error>  if  there  is  no  following 
statement.)  Otherwise, 

(3)  Assign  first  element  in  5 to  x;  Assign  tail 
of  3x  to  sx.  [Note:  tail  of  3x  is  given  by 
#TERMINAL-SUBSEQ-OF-LENGTH  (#LENGTH(sx)  - 1 ) 
#0F  sx".  ] 

(4)  Execute  Compound-statement  c;  go  to  2. 

#FOR-ALL  x:a<=x<=b  #D0  c 

#FOR-ALL  x:  a < = X #D0  c 

<error>  if  "a  #IS-NOT  //INTEGER"  or  (if  b is 

given)  "b  #IS-NOT  //INTEGER". 

Otherwise:  perform  the  following  steps  in  order 

(1)  Construct  a new  dummy  variable  named  x,  with 
scope  extending  throughout  c.  Evaluate  a 
and  assign  3-1  to  x.  If  b is  given, 
evaluate  b and  save  D for  later  use. 

(2)  Assign  X+1  to  x.  If  b is  given,  and  if  5t  > 
B,  go  immediately  to  the  statement  following 
c.  (Halt  on  <error>  if  there  is  no 
following  statement.)  Otherwise, 

(3)  Execute  compound  statement,  c;  go  to  2. 

//WHILE  b #D0  c 


Perform  the  following  steps  in  order. 

(1)  Evaluate  b 

(2)  If  B is  <true>,  then  execute  compound 
statement,  c and  then  go  to  step  1. 

(3)  If  B is  <false>,  go  immediately  to  the 
statement  following  c.  (Halt  on  <error>  if 
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there  is  no  following  statement). 
(4)  Otherwise,  halt  on  <error>. 


#IF  b #THEN  s 

If  ”b  #EQ  #TRUE",  execute  Compound-statement  s. 

If  "b  #EQ  #FALSE”,  proceed  to  the  statement 
following  3.  (Halt  on  <error>  if  there  is  no 
following  statement.) 

Otherwise,  halt  on  <error>. 

#BEGIN  si  s2  ...  sn  #END 

Compose  the  block  of  statements  3l,s2,,..,sn  into 
a single  Compound-statement. 

Execution  of  the  composed  block  proceeds  by 
executing  s1,s2,...,sn  in  order. 


#DF  Simple-statement 

= > <'#ASSIGN-VALUE'>  <gap>  <M'>  <gap>  <Name> 
<gap>  <'r'>  <gap>  <Expression> 

=>  <'#COMPUTE'>  <gap>  <'!’>  <gap>  <Expression> 

r>  <'#RETURN-WITH-VALUE' > <gap>  <’!»>  <gap> 
<Expression>  #. 


#ASSIGN-VALUE!  a = e 

Note:  a must  be  a declared  global  variable,  and  e 
must  be  a semantic  expression. 

Evaluate  semantic  expression  e,  assign  resulting 
object  to  declared  global  variable  a. 

This  statement  is  an  abbreviation  for  "^COMPUTE! 
#ASSIGN-LATEST-VALUE( 'a' ,e)" . 
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#COMPUTE!  e 


Evaluate  semantic  expression  e. 
#RETURN-WITH-VALUE!  e 

<error>  if  this  statement  is  executed  in  the 
control  section. 

Evaluate  e.  Terminate  evaluation  of  the 
procedural  semantic  definition  containing  this 
statement,  returning  6 as  the  value  of  the 
semantic  definition  reference. 


p 
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' I 


SEMAN0L(76)  Reference  Manual 
III.  Description  of  SEMANOL(76) 


Syntactic  Definitions 


#DF  Context-free-syntax 


=>  <'#CONTEXT-FREE-SYNTAX'>  <gap>  <’:•>  <$<<gap> 
<Syntactic-def inition>>  #. 


The  "Context  free  syntax  section"  contains  a collection  of 
"Syntactic  definitions",  which  are  used  to  specify  an  (almost) 
context  free  grammar  for  a language  (i.e.  a set  of  strings) 
over  the  ASCII  character  set.  Actually,  several  possibly 
independent  grammars  can  be  included  in  this  section. 


, I 


#DF  Syntactic-definition 


= > <'//DF'>  <gap>  <Syntactic-class-name>  <gap> 
<.5t1<<'=>'>  <gap>  <Syntactic-expression>  <gap>> 


<’#.'>  #. 


#DF  Syntactic-class-name 

=>  <Name>  #. 


Syntactic  definitions  serve  as  the  productions  of  (one  or 
more)  grammars  collected  in  the  Context  free  syntax  section. 
Each  syntactic  definition  serves  to  declare  the  syntactic  class 
name  (or  syntactic  definition  name)  for  use  in  the  remainder  ol 
the  SEMAN0L(76)  programs.  For  purposes  of  explication,  we  will 
speak  of  the  grammars  in  this  section  as  generative  grammars: 
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r 

I 


r 


i.e.,  the  syntactic  definitions  represent  rules  for  the 
construction  of  possibly  infinite  sets  of  strings  (languages). 
In  fact,  the  grammars  are  used  in  SEMANOL(76)  as  recognition 
grammars,  or  parsing  grammars,  and  are  employed  in  the 
semantics  of  the  "CONTEXT-FREE-PARSE-TREE . . . " operator,  and 
certain  membership  relations  discussed  below. 

The  terminals  of  SEMANOL(76)  syntactic  expressions  are  the 
strings  specified  by  the  syntactic  set  constants  discussed 
below.  SEMAN0L(76)  syntactic  expressions  need  not  be  grounded ; 
an  expression  is  not  grounded  if  by  using  the  standard 
rewriting  algorithm  for  grammars  (see  Appendix  A),  one  cannot 
reduce  the  expression  to  a string  of  terminals.  However,  any 
such  expression  cannot  be  employed  in  the  successful  parse  of  a 
string  using  the  '’#CONTEXT-FREE-PARSE-TREE"  operator.  There  is 
one  ungrounded  syntactic  set  constant:  #EMPTYSET. 

Each  syntactic  class  name  or  syntactic  definition  name  is 
then  associated  with  a possibly  infinite  set  of  strings,  called 
a syntactic  class,  by  virtue  of  the  syntactic  definition  which 
declares  the  syntactic  class  name.  Each  such  syntactic 
definition  has  the  form: 

#DF  c =>  b1 
= > b2 
= > b3 


=>  bn  #. 

where  the  c is  a syntactic  definition  name,  and  the  bi  are 
syntactic  expressions.  The  name  c is  then  associated  with  the 
syntactic  class  formed  by  taking  the  union  of  the  sets  ^1,  1^2, 
...,  ]in,  represented  by  the  corresponding  syntactic 
expressions . 

It  is  assumed  that  any  string  x in  the  set,  C,  associated 
with  c is  in  exactly  one  of  the  sets  bi . If  this  is  not  so 
(i.e.,  X is  in  more  than  one  bi),  the  definition  of  c is  said 
to  be  ambiguous.  Ambiguity  is  checked  for  only  when  parsing  or 
recognizing  a given  string,  as  described  above.  Thus  a grammar 
may  ^e  ambiguous,  which  is  not  considered  legal  in  SEMAN0L(76), 
but  that  fact  may  not  be  detected  during  the  execution  of  the 
SEMAN0L(76)  program.  A precise  definition  of  ambiguity  is 
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#DF  Syntactic-expression 

=>  <Syntactic-term>  <%<  <gap>  <'#U*>  <gap> 
<Syntactic-term>>> 

= > <Syntactic-term>  <gap>  <'y/S-’>  <gap>  <.  < /* 
<gap>  <String>  <gap>  <%<<Comma>  <gap>  <String> 
<gap>>>  <’>•>  #. 

#DF  Syntactic-term 

=>  <Syntactic-primary>  <^<<gap> 
<Syntactic-primary>>> 

=>  <’(’>  <gap>  <Syntactic-expression>  <gap>  <*)*> 
=>  <Syntactic-class-name> 

=>  <*?’>  <gap>  <*1'>  <gap>  <Syntactic-primary> 

=>  <*$*>  <gap>  <Syntactic-primary> 

=>  <Syntactic-set-constant>  #. 


a #U  b 


The  union  of  the  sets  3 and  5. 

a #S-  <'s1 ' , 's2’ , . . . , 'sn* > 

The  set  of  strings  obtained  by  removing  the 
strings,  s1,32,...,sn  from  3. 

<b1><b2>. . .<bn> 

The  set  concatenation  of  h sets  of  strings, 

B 1 ,B2 , . . . , Bn ; i.e.,  the  set  of  strings  {a:  a = 
”a1a2...an”,  and  "al”  is  in  B1,  and  "a2''  is  in 
B2,  ...,  and  "an”  is  in  Bn}. 


(e) 
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The  set,  S,  also  designated  by  the  SEMANOL(76) 
syntactic  expression,  e. 


The  Kleene-star  set,  D*.  That  is,  the  set  which 
might  be  designated  by  the  infinite 
SEMANOL(76)-like  syntactic  expression,  "#NILSET 
#U  <b>  #U  <b><b>  #U  ...  ". 


D*,  found  by 


The  subset  of  the  Kleene-star  set 
removing  the  empty  string,  <nil>. 


#DF  Syntactic-primary 


> <'<’>  <gap>  <Syntactic-expression>  <gap>  <•>’> 


=>  <•<*>  <gap>  <String>  <gap>  <$<<Comma>  <gap> 
<String>  <gap>>>  <’>*>  #. 


#DF  Syntactic-set-constant 


> <'#ASCII'> 


> <'#CAP'> 


> <’#DECNUM’> 


> <'#DIGIT'> 


> <'#EMPTYSET' > 


> <'#GAP'> 


> <'#LETTER'> 


> <’#LOWCASE’> 


> <'#NAT-NOS'> 


> <'#NILSET'> 


> <*//SPACESET'>  # 
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<e> 


The  set,  S,  also  designated  by  the  SEMANOL(76) 
syntactic  expression,  e. 


#ASCII 

The  set  of  all  ASCII  characters. 

#CAP 

The  set  of  all  ASCII  capital  letters,  A through 

Z. 

#DECNUM 

The  set  of  ASCII  strings  formed  by  following  an 
optional  plus  or  minus  sign  by  one  or  more 
digits.  That  is,  the  set  also  given  by  the 
SEMAN0L(76)  syntactic  expression  *'<#NILSET  #U 
<'+',  <#DIGIT>>".  (see  the  discussion 

of  the  "CONTEXT-FREE-PARSE-TREE. . operator, 
below  — especially  Section  2.  — , for  a more 
detailed  discussion  of  constraints  on  the  use  of 
this  set  constant.) 

#DIGIT 

The  set  of  ASCII  decimal  digits,  0 through  9. 

(/EMPTYSET 

The  set  containing  no  elements. 

#GAP 


The  set  consisting  of  strings  of  0 or  more  ASCII 
blank  characters;  except  that  the  empty  string, 
<nil>,  is  excluded  in  alphanumeric  left  and  right 
contexts.  (Here  we  are  speaking  of  syntactic  set 
constants  in  terms  of  generative  grammars;  see 
Appendix  A,  Section  2,  for  a more  detailed 
discussion  of  constraints  on  the  use  of  this  set 
constant . ) 
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#LETTER 

The  set  of  all  ASCII  capital  and  lower  case 
letters,  A through  Z,  and  a through  z.  That  is, 
the  set  also  designated  by  the  SEMANOL(76) 
syntactic  expression  "<#CAP  #U  #LOWCASE>”. 

#LOWCASE 

The  set  of  ASCII  lower  case  letters,  a through  z. 

#NAT-NOS 

The  set  consisting  of  strings  of  one  or  more 
ASCII  digits.  That  is,  the  set  also  designated 
by  the  SEMANOL(76)  syntactic  expression  "<$1 
<#DIGIT>>".  (see  Appendix  A,  Section  2,  for  a 
more  detailed  discussion  of  constraints  on  the 
use  of  this  set  constant.) 

#NILStT 

The  set  consisting  of  the  null  string. 

#SPACESET 

The  set  consisting  of  the  single  ASCII  blank 
character . 

<s1 ,s2, . . . ,sn> 

The  set  , {SI  ,S2,  . . . ,Sn}  , of  strings  of  ASCII 
characters 
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II 


Semantic  Definitions 


II 


#DF  Semantic-definition-section 

=>  <’#SEMANTIC-DEFINITIONS'>  <gap>  <$<<gap> 

<Semantic-def inition>>>  #. 


The  "Semantic  definitions  section"  contains  "Semantic 
definitions",  which  are  operationally  similar  to  function 
declarations  in  other  programming  languages.  Semantic 
definitions  consist  of  a "Semantic  definition  name"  followed  by 
an  optional  "Dummy  parameter  list"  followed  by  a "Semantic 
definition  body".  A semantic  definition  may  be  "functional" 
or  "procedural";  i.e.,  it  specifies  the  selection  of  a 
SEMAN0L(76)  expression  which  is  to  be  evaluated  ("functional"), 
or  it  specifies  a sequence  of  "Statements"  which  are  to  be 
executed  in  order  ("procedural").  Semantic  definitions  may  be 
directly  or  indirectly  recursive. 


#DF  Semantic-definition 

=>  <Functional-def inition> 

=>  <Procedural-def inition>  #. 
#DF  Functional-definition 

=>  <Simple-def inition> 

=>  <Def inition-by-cases>  #. 
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Semantic  definitions  are  invoked  by  evaluating  "semantic 
definition  references",  of  the  form  "c (a  1 , . . . , an ) " or 
" ( $a1 , . . . an$ )c" , where  c is  a semantic  definition  name,  and  the 
ai  are  SEMANOL(76)  semantic  expressions  in  an  optional  "actual 
argument  expression  list".  The  sequence  of  steps  for 
evaluating  a semantic  definition  reference  is  as  follows: 

(1)  Evaluate  the  actual  argument  expressions  in  the  semantic 
definition  reference,  from  left  to  right  (if  there  are  any). 

(2)  Find  the  corresponding  semantic  definition  (if  there  is 
none,  halt  on  <error>).  Construct  nuw  local  (formal  parameter) 
variables,  given  the  formal  parameter  names  (if  there  are  any). 
If  the  number  of  values  does  not  equal  the  number  of  parameter 
variables,  halt  on  <error>.  Assign  the  values  of  the  argument 
expressions  to  the  formal  parameter  variables  (if  there  are 
any) . 

(3)  (a)  If  the  semantic  definition  name  has  not  been  declared 
a syntactic  component  name  in  the  declarations  section,  then  do 
(c);  otherwise  do  (b). 

(b)  If  the  first  actual  argument  value  is  a parse  tree 
node,  n,  and  if  the  syntactic  component  pair,  (c,v)  is  attached 
to  n,  ^ becomes  the  result  value,  which  is  the  value  of  the 
semantic  definition  reference.  Otherwise,  do  (c). 

(c)  Evaluate  the  semantic  definition  body  as  described  in 

(4)  below,  giving  a result  value  which  is  the  value  of  the 
semantic  definition  reference.  If  the  semantic  definition  has 
been  declared  a syntactic  component,  and  if  the  first  actual 
argument  value  is  a parse  tree  node  (which  has  no  syntactic 
component  pair  (c,v)  attached),  then  attach  to  the  node  the 
pair  (c,xl)  where  yj.  is  the  result  value. 

(4)  This  step  is  described  in  detail  in  the  discussions  below 
for  each  type  of  semantic  definition. 


#DF  Simple-definition 


;>  <'#DF'>  <gap>  <Def iniendum>  <gap> 
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<Unconditional-def iniens>  <gap>  <’#.'> 

#DF  Definiendum 

=>  <Semantic-def inition-name>  <gap>  <'('>  <gap> 
< Formal -pa ram-name > <gap>  <J<<Comma>  <gap> 
<Formal-param-name>  <gap>>  <’)’> 

=>  <Semantic-def inition-name>  #. 

#DF  Semantic-definition-name 

=>  <Name>  #. 

#DF  Forraal-param-name 

=>  <Name>  #. 

#DF  Unconditional-def iniens 

=>  <'=>’>  <gap>  <Expression>  #. 


The  form  of  a simple  definition  is 
#DF  c (p1,...,pn)  =>  expr  #. 

where  the  c is  the  semantic  definition  name,  and  pi  through  pn 
are  formal  parameter  names  in  an  optional  formal  parameter 
list,  and  expr  is  a SEMANOL(76)  semantic  expression  possibly 
containing  formal  parameter  names,  and  also  possibly  containing 
semantic  definition  references  (though  normally  not  to  c 
itself,  as  this  would  almost  surely  be  a circular  (ungrounded) 
recursion ) . 

Uoon  evaluation  of  a semantic  definition  reference 
corresponding  to  definition  c,  the  evaluation  sequence 
described  above  would  be  invoked,  using  step  (4)  below: 

«««  (4)  -phe  result  value  of  the  simple  definition  body  is 
simply  obtained  by  evaluating  the  unconditional  definiens.  ••• 

Note  that  any  appearance  of  a formal  parameter  name  in  the 
unconditional  definiens  has,  as  its  value,  the  value  assigned 
in  step  (2)  of  the  evaluation  sequence  above. 
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#DF  Definition-by-cases 

=>  <*#DF'>  <gap>  <Def iniendum>  <gap> 
<5t<<Conditional-def iniens>  <gap>  <';'><gap>>> 
<Conditional-def iniens>  <’#.'> 

=>  <'#DF'>  <gap>  <Def iniendum>  <gap>  <%\ 
<<Conditional-def iniens>  <gap>  <';•>  <gap>>> 
<Unconditional-def iniens>  < ' ^OTHERWISE ' > #. 

/i^DF  Conditional-def iniens 

= > <•=>’>  <gap>  <Expression>  <gap>  <'//IF'>  <gap> 
<Boolean-expression>  #. 


I 

] 


The  form  of  a definition-by-cases  is 

^tF  c (p  1 , . . . , pn ) . : ^ 

j! 

=>  expr-1  #IF  cond-1  ; j 

= > expr-2  #IF  cond-2  ; 1 ! 


=>  expr-n  fOTHERWISE  #. 

where  n > 1,  and  where  the  parameter  list  and  the  last 
definiens  are  optional.  Qf  the  last  definiens  is  mis^in^,  a 
definiens  of  the  form: 

"=>  TERROR  fOTHERWISE” 

is  assumed.)  The  value  expressions,  expr-i,  and  the 
conditional  expressions,  cond-i,  may  contain  formal  parameter 
names  and  semantic  definition  references  to  any  semantic 
definitions  (including  c). 

Upon  evaluation  of  a semantic  definition  reference 
corresponding  to  definition  c,  say,  the  evaluation  sequence 
described  above  would  be  invoked,  using  step  (4)  below. 
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««•  (4)  The  evaluation  of  a definition-by-cases  body  proceeds 
as  follows: 

Evaluate  the  conditional  expressions,  in  order,  until  a 
non-<false>  result  is  obtained,  say,  for  cond-j . If  the  value 
of  cond-j  is  not  <true>,  then  halt  on  <error>.  Otherwise, 
evaluate  the  corresponding  value  expression,  expr- J , thus 
producing  the  result  value  (evaluation  of  the  body  thus 
completing) . 

If  <false>  is  the  value  obtained  for  all  conditional 
expressions,  then  the  value  expression  expr-n  in  the 
#OTHERWISE-def iniens  is  evaluated  to  produce  the  result  value. 
(Here  an  implicit  ”=>  #ERROR  ^OTHERWISE"  definiens  is  assumed 
if  there  is  no  explicit  #OTHERWISE-def iniens , and  in  this  case, 
an  <error>  halt  would  ensue.) 


#DF  Procedural-definition 

=>  <*#PROC-DF'>  <gap>  <Definienduro>  <gap> 
<Compound-statement>  <gap> 
<J<<Compound-statement>  <gap>>>  <*#.'>  #. 


The  form  of  a procedural  definition  is 
/ifPROC-DF  c(p1,...,pn) 


s 1 


sn  #.  (n  > 0) 


where  the  parameter  list  is  optional  and  the  si  are 
Compound-statements.  The  expressions  in  the  si  may  contain 
formal  parameter  names,  and  semantic  definition  references  to 
any  semantic  definitions  (including  c). 
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Upon  evaluation  of  -i  semantic  definition  reference 
corresponding  to  definition  c,  say,  the  evaluation  sequence 
described  above  is  invoked,  using  step  (4)  below: 


•••  The  evaluation  of  the  procedural  definition  body 
proceeds  by  executing  the  compound  statements  si  through  sn,  in 
order,  according  to  the  rules  described  above  in  the  discussion 
of  the  control-section.  ••• 


If  evaluation  ever  produces  a result  value,  it  does  so  by 
executing  the  "RETURN-WITH-VALUE ! " statement  (again  described 
above  in  the  discussion  of  the  control  section). 
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ff 


Expressions 


ft 


SEMAN0L(76)  expressions  are  composed  from  keyword 
expressions,  and  each  of  the  keywords  has  a precfcue..je  ^or 
evaluation  as  given  in  the  grammar  used  in  the  following  pages. 


#DF  Expression 


=>  <Boolean-expression> 
=>  <’#STOP'> 

=>  <'#ERROR»>  #. 


#STOP 

<stop>;  when  this  keyword  is  evaluated,  the 
execution  of  the  SEMANOL(76)  program  terminates. 

//ERROR 


<error>;  when  this  keyword  is  evaluated,  the 
execution  of  the  SEMANOL(76)  program  terminates 
with  a standard  error  message. 
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Boolean  Expressions 


#DF  Boolean-expression 


=>  <Implication>  <$<  <gap>  <*#IFF'>  <gap> 
<Implication>>>  #. 


IDF  Implication 


=>  <Dis junction>  <X<  <gap>  <'#IMPLIES'>  <gap> 
<Dis junction>>>  #. 


IDF  Disjunction 


=>  <Con junction>  <$<  <gap> 
<Con junction>>>  I. 


=>  <Negation>  <%<  <gap>  <'& 
<Negation>>>  I. 


lAND'  > 


IDF  Negation 


> <Boolean-primary> 


> <’INOT'>  <gap>  <Boolean-primary>  I 


IDF  Boolean-primary 


> <Relational-expression> 


> <Sequence-expression>  I 
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a #IFF  b 

<true>  if  (a  = <true>  and  B = <true>)  or  (3 
<false>  and  B = <false>) 

<false>  if  (a  = <false>  and  B = <true>)  or  (a 
<true>  and  B = <false>) 

<error>  otherwise. 

a #IMPLIES  b 

<true>  if  a = <false>  or  B = <true>; 

<false>  if  a = <true>  and  B = <false>; 

<error>  otherwise. 

a #0R  b 

<true>  if  a = <true>  or  B = <true>; 

<false>  if  a = <false>  and  B = <false>; 

<error>  otherwise. 

a #AND  b 
a A b 

<true>  if  a = <true>  and  B = <true>; 

<false>  if  a = <false>  or  B = <false>; 

<error>  otherwise. 

#NOT  a 

<false>  if  a = <true>; 

<true>  if  a = <false>; 

<error>  otherwise. 
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i 

Relational  Expressions 


#DF  Relational-expression 

=>  <Membership-relation> 

=>  <Case-identif ication> 

=>  <Subword-relation> 

=>  <Precedes-relation> 

=>  <Quantif ier-relation> 

=>  <Equality-relation> 

= > <Arithmetic-inequality>  if. 


The  SEMAN0L(76)  relations  are  really  characteristic 
functions  which  return  the  value  <true>  if  the  arguments  are 
members  of  the  relation,  <false>  if  the  arguments  are  not  in 
the  relation  but  are  acceptable  to  the  function,  and  <error>  if 
the  arguments  are  not  acceptable  to  the  function. 


#DF  Membership-relation 

=>  <Type-identif ication> 


=>  <Character-identif ication> 
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=>  <Syntactic-cla3s-membership> 
=>  <Sequence-membership>  #. 

#DF  Membership-operator 
=>  <'#IS'> 

=>  <'#IS-IN'> 

=>  <’#IS-NOT'> 

=>  <'#IS-NOT-IN'>  #. 


The  four  types  of  membership  relation  are  distinguished 
according  to  the  second  operand  expression,  b;  b must  be  either 
a type  designator,  a character  set  constant,  a union  of 
syntactic  class  references  or  a sequence  expression.  If  b is 
not  one  of  these  kinds  of  expressions,  then  "a  #IS  b”  produces 
<error>  when  evaluated. 

The  membership  relations  all  have  one  of  the  following 
f orms : 

"a  #IS  b" 

"a  #IS-NOT  b” 

"a  #IS-IN  b" 

"a  #IS-NOT-IN  b" 

Since  the  other  three  forms  are  completely  definable  in 
terms  of  the  #IS-expressions , we  shall  do  so  here.  The  rest  of 
the  membership  relations  will  be  described  only  for  the 
//IS-expression . 

a #IS-IN  b 

Synonymous  with  "a  #IS  b” ; that  is, 

<true>  (<false>)  if  and  only  if  "a  #IS  b" 
evaluates  to  <true>  (<false>); 

<error>  otherwise. 

a #IS-NOT  b 


Synonymous  with  ”#NOT(a  #IS  b)";  that  is 
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<true>  (<false>)  if  and  only  if  "a  #IS  b" 
evaluates  to  <false>(<true>) ; 

<error>  otherwise. 

a #IS-NOT-IN  b 

Synonymous  with  "a  #IS-NOT  b” ; that  is 

<true>  (<false>)  if  and  only  if  "a  #IS  b" 
evaluates  to  <false>( <true> ) ; 

<error>  otherwise. 


#DF  Type-identification 

=>  <Sequence-expression>  <gap> 
<Membership-operator>  <gap>  <Type>  #. 

#DF  Type 

=>  <'#UNDEFINED'> 

=>  <'#BOOLEAN'> 

=>  <'#SEQUENCE»> 

=>  <'#NODE'> 

= > <' //STRING '> 

= > <’ //INTEGER' > 

= > <' //BIT-STRING  •>  //. 


[ALSO  SEE:  Chapter  II,  Section  C.  "SEMANOL(76)  Data  Types"] 
a #IS  #UNDEFINED 


<true>  if  a is  <undefined>; 
<false>  otherwise. 
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a #IS  #BOOLEAN 

<true>  if  § is  either  <true>  or  <false>; 
<false>  otherwise, 
a #IS  #SEQUENCE 

<true>  if  a is  a SEMANOL(76)  sequence  object; 
<false>  otherwise. 

a #IS  iNODE 

<true>  if  a is  a SEMANOL(76)  parse  tree  node; 
<false>  otherwise. 


a //IS  #STRING 

<true>  if  a is  a SEMANOL(76)  string  object; 
<false>  otherwise. 


a //IS  //INTEGER 


<true>  if  a is  a string  which  satisfies  the 
syntax  for  a SEMANOL(76)  integer  constant  (c.f., 
the  grammar  for  <Integer-constant>  below). 

<false>  otherwise. 

a //IS  #BIT-STRING 

<true>  if  a is  a string  which  satisfies  the 
syntax  for  a SEMANOL(76)  bit  string  constant 
(c.f.,  the  grammar  for  <Bit-string-constant> 
below) . 

<false>  otherwise. 


//DF  Character-identification 


=>  <Sequence-expreasion>  <gap> 
<Membership-operator>  <gap>  <Set-constant>  #. 
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#DF  Set-constant 


=>  <'#CAP'> 

=>  <’#DIGIT'> 

= > <’ //LETTER ’> 

=>  <'#LOWCASE'> 

= > <'i!(SPACESET'> 


r 


i 

i 


;■  I 

[ 


) 


\ 
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a #IS  #CAP 

<error>  if  a is  not  string  convertible; 

<true>  if  the  string  value  of  a is  in  the  set  of 
ASCII  capital  letters,  A through  Z. 

<false>  otherwise. 

a #IS  #DIGIT 


<error>  if  a is  not  string  convertible; 

<true>  if  the  string  value  of  8 is  in  the  set  of 
ASCII  decimal  digits,  0 through  9. 

<false>  otherwise. 


a //IS  #LETTER 


<error>  if  a is  not  string  convertible; 

<true>  if  the  string  value  of  a is  in  the  set  of 
ASCII  capital  and  lower  case  letters,  A through 
Z,  and  a through  z; 

<falae>  otherwise. 


a #IS  #LOWCASE 


<error>  if  a is  not  string  convertible; 
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<true>  if  the  string  value  of  3 is  in  the  set  of 
ASCII  lower  case  letters,  a through  z; 

<false>  otherwise. 

a #IS-IN  #SPACESET 

<error>  if  3 is  not  string  convertable; 

<true>  if  the  string  value  of  3 is  the  ASCII 
blank  character. 

<false>  otherwise. 


#DF  Syntactic-class-raembership 

r>  <Sequence-expression>  <gap> 
<Meinbership-operator>  <gap> 
<Syntactic-class-union>  #. 

#DF  Syntactic-class-union 

=>  <Syntactic-class-reference>  <gap>  <%  < <gap> 
<'#11' > <gap>  <Syntactic-class-reference>>>  #. 

#DF  Syntactic-class-reference 

=>  <'<'>  <gap>  <Syntactic-class-narae>  <gap>  <*>'> 


a #IS  <b1> 
a #IS  <b1>  #U  <b2> 


a IIS  <b1>  #U  <b2>  #U  ...  lU  <bn> 

<error>  if  3 is  not  string  convertible,  or  if  the 
bi  are  not  syntactic  class  names  appearing  in  the 
definienda  of  syntactic  definitions; 

CASE  1:  a is  a node. 
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<true>  if  the  syntactic  class  name  label  on  the 
node,  a (cf,  the  discussion  of  the 
"#CONTEXT-FREE-PARSE-TREE. . operator,  below) 
matches  one  of  the  syntactic  class  names,  bi; 

<false>  otherwise. 

CASE  2:  a is  a string. 

<true>  if  there  is  an  i <=  n such  that  bi  is  the 
first  (reading  from  the  left)  syntactic  class 
name  for  a syntactic  class  containing  the  string 
value  of  a,  and  if  for  all  j (1  <=  j <=  i)  the 
grammars  which  have  bj  as  their  start  symbol  are 
unambiguous  with  respect  to  a.  If  the  grammars 
for  the  bj*s  include  one  which  is  ambiguous,  the 
value  is  <error>; 

<false>  otherwise. 

NOTE;  Here  the  SEMANOL(76)  processor  invokes  the 
//CONTEXT-FREE-PARSE-TREE  operator  in  order  to 
recognize  the  string  with  respect  to  the  grammars 
"started”  by  each  of  the  syntactic  class  names, 
bi,  in  order  of  increasing  i. 


#DF  Sequence-membership 

=>  <Sequence-expression>  <gap> 

<Membership-operator>  <gap>  <Sequence-expression> 

#. 


a #IS-IN  b 

<error>  if  b is  a SEMAN0L(76)  semantic 
expression,  and  B is  not  a sequence; 

<true>  if  there  is  an  integer  i such  that  "i 
#TH-ELEMENT-IN  b #EQ  a " holds; 


<false>  otherwise. 
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#DF  Case-identification 

=>  <Sequence-expression>  <gap>  < ' #IS' , ' #IS-NOT' > 
<gap>  <'#CASE'>  <gap>  <Sequence-expression>  <gap> 
<'#0F'>  <gap>  <Syntactic-class-reference>  #. 


a #IS  #CASE  n #0F  <c> 

<error>  if  "n  #IS-NOT  //INTEGER  //OR  a //IS-NOT 
//NODE"  holds; 

<true>  if  "a  //IS  c"  holds  and  if  a is  tagged  with 
the  case  number,  fl  (c.f.,  the  discussion  of  the 
"//CONTEXT-FREE-PARSE-TREE.  . operator,  below); 
that  is,  node  a was  constructed  by  virtue  of  the 
n-th  definiens  in  the  syntactic  definition  named 
c; 

<false>  otherwise. 

a //IS-NOT  //CASE  n #0F  <c> 

<true>  (<false>)  if  and  only  if  "a  #IS  //CASE  n 
//OF  c"  evaluates  to  <false>  (<true>); 

<error>  otherwise. 


//DF  Subword-relatlon 

= > <Sequence-expression>  <gap>  <' //IS //IS-NOT  • > 
<gap>  <* //SUBWORD' > <gap>  <Sequence-expression> 

= > <Sequence-expression>  <gap>  <' //IS //IS-NOT’ > 
<gap>  <//NODE-IN>  <gap>  <Sequence-expression>  #. 


a #IS  //SUBWORD  b 
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<error>  if  a (or  D)  is  not  string  convertible; 

<true>  if  a is  a substring  of  b (that  is,  D = 
”b1a1b2”,  where  "b1”,  "a1",  and  "b2"  are  strings 
— possibly  <nil>  — , and  a = "al"); 

<false>  otherwise. 

a #IS-NOT  #SUBWORD  b 

<true>  (<false>)  if  and  only  if  "a  #IS  #SUBWORD 
b”  evaluates  to  <false>  (<true>); 

<error>  otherwise. 

a #IS  #NODE-IN  b 

<error>  if  "a  #IS-NOT  #NODE  #0R  b #IS-NOT  ^NODE" 
holds ; 

<true>  if  B is  the  "root"  node  of  a (sub)  parse 
tree  which  contains  a as  a node; 

<false>  otherwise. 

This  is  equivalent  to  "a  #IS-IN 
#SEQUENCE-OF-NODES-IN  b" . 

a #IS-NOT  #NODE-IN  b 

<true>  (<false>)  if  and  only  if  "a  #IS  //NODE-IN 
b"  evaluates  to  <false>  (<true>); 

<error>  otherwise. 

This  is  equivalent  to  "a  #IS-NOT-IN 
#SEQUENCE-OF-NODES-IN  b" . 


#DF  Precedes-relation 

=>  <Sequence-expresslon>  <gap>  <’ ^PRECEDES' > 

<gap>  <Sequence-expression>  <gap>  <'#IN'>  <gap> 

< Sequence -exp res s ion > 

=>  <Sequence-expression>  <gap> 

<* #DOES-NOT-PRECEDE' > <gap>  <Sequence-expression> 
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<gap>  <'#IN'>  <gap>  <Sequence-expression> 


a fPRECEDES  b #IN  c 

<error>  if  neither  of  the  following  conditions 
hold:  (1)  5 is  a sequence,  or  (2)  S,  B,  and  C are 
all  nodes; 

CASE  1 (5  is  a sequence) 


<false>  if  a (or  B)  is  not  an  element  cf  C; 

<true>  if  the  ordinal  position  of  the  first 
occurrence  of  a in  C is  less  than  the  ordinal 
position  of  the  first  occurrence  of  B in  B (i.e., 
if  "#ORDPOSIT  a #IN  c < #ORDPOSIT  b //IN  c"); 

<false>  otherwise; 

CASE  2 (a,  B,  and  B are  all  nodes) 


<false>  if  a (or  B)  is  not  a node  in  the  subtree 
of  which  B is  the  root  node; 

<true>  if  a appears  before  B in  a pre-order  scan 
of  the  nodes  in  B; 

<false>  otherwise; 

NOTE:  This  case  is  synonymous  with  the  expression 
"a  ^PRECEDES  b //IN  //SEQUENCE-OF-NODES-IN(c)'’ 
which  is  an  instance  of  case  1 of  this  relation. 


#DF  Quantifier-relation 

= > <'//THERE-EXISTS'>  <gap>  <Name>  <gap>  <’:’> 
<gap>  <Bounded-interval>  < ' //SUCH-THAT ' > <gap> 
<’('>  <gap>  <Boolean-expression>  <gap>  <’)’> 

= > <’ //THERE-EXISTS' > <gap>  <Name>  <gap>  <’/fIN'> 
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r 


<gap>  <Sequence-expression>  <#SUCH-THAT ' > <gap> 
<’(’>  <gap>  <Boolean-expression>  <gap>  <')’> 

=>  <*#FOR-ALL'>  <gap>  <Name>  <gap>  <’:•>  <gap> 
<Bounded-interval>  <gap>  <’ #IT-IS-TRUE-THAT’ > 
<gap>  <'('>  <gap>  <Boolean-expression>  <gap> 

<*  )’> 

=>  <'#FOR-ALL'>  <gap>  <Name>  <gap>  <'#IN'>  <gap> 
<Sequence-expression>  <gap>  <’(’>  <gap> 
<Boolean-expression>  <gap>  <’)’> 


t; 
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#THERE-EXISTS  b : a <=  b <=  c #SUCH-THAT  ( B ) 

<error>  if  "a  #IS-N0T  #INTEGER  #0R  c #IS-NOT 
#INTEGER''  holds; 

<false>  if  "c  < a”  holds  or  if,  for  all  integers 
B,  a <=  b <=  2,  the  expression  "B[b]"  evaluates 
to  <false>  (see  note); 

<true>  if  there  is  an  integer,  B,  a <=  B <=  2, 
such  that  "BEb]”  evaluates  to  <true>  and,  for  all 
integers  9,  3 <=  3 < B,  ”B[b]”  evaluates  to 
<false>  (see  note); 

<error>  otherwise. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 

#THERE-EXISTS  b #IN  c #SUCH-THAT  ( B ) 

<error>  if  2 is  not  a sequence; 

<false>  if  every  element,  B,  of  2 is  such  that 
''B[b]''  evaluates  to  <false>  (see  note); 

<true>  if  there  is  an  element,  B,  of  2 such  that 
"B[b]”  evaluates  to  <true>,  and  each  element,  a, 
preceding  B in  2 is  such  that  "B[a]”  evaluates  to 
<false>  (see  note); 

<error>  otherwise. 


P-i. 


j 


* 


y 
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Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  x.  Also  see  Chapter  II,  Section  I. 

#FOR-ALL  b:  a <=  b <=  c #IT-IS-TRUE-THAT  ( B ) 

<error>  if  "a  #IS-NOT  ^INTEGER  #0R  b //IS-NOT 
//INTEGER”  holds; 

<false>  if  there  is  an  integer,  B,  a <=  C,  such 
that  "B[b]”  evaluates  to  <false>  and,  for  all 
integers  3,  a <=  a < B,  ”B[d]”  evaluates  to 
<true>  (see  note); 

<true>  if  "c  < a”  holds  or  if,  for  all  integers 
B,  a <=  B <=  a,  the  expression  "B[b]”  evaluates 
to  <true>  (see  note); 

<error>  otherwise. 

More  precisely,  this  keyword  expression  is 
equivalent  to 

"#NOT  #THERE-EXISTS  b:  a <=  b <=  c //SUCH-THAT 
(//NOT  (B))”. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 

//FOR-ALL  b #IN  c //IT-IS-TRUE-THAT  (B) 

<error>  if  "c  //IS-NOT  //SEQUENCE”  holds; 

<false>  if  there  is  an  element,  B,  of  B such  that 
”B[b]"  evaluates  to  <false>,  and  each  element,  a, 
preceding  B in  B is  such  that  ”B[a]”  evaluates  to 
<true>  (see  note); 

<true>  if  every  element,  B,  of  B is  such  that 
”B[b]”  evaluates  to  <true>  (see  note); 

<error>  otherwise. 

More  precisely,  this  keyword  expression  is 
equivalent  to  "//NOT  //THERE-EXISTS  b #TN  c 
#SUCH-THAT  (//NOT  (B))". 
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Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 


#DF  Equality-relation 


=>  <Sequence-expression> 
<Sequence -express ion > 

=>  <Sequence-expression> 
<Sequence-expression> 

=>  <Sequence-expression> 
<Sequence-expression> 

=>  <Sequence-expression> 
< Sequence -exp res s ion > 

=>  <Sequence-expression> 
<Sequence-expression> 

=>  <Sequence-expression> 
< Sequence-express ion > 

=>  <Sequence-expression> 
<Sequence-expression> 

=>  <Sequence-expression> 
< Sequence -expression> 

=>  <Sequence-expression> 
<Sequence -express ion > 

=>  <Sequence-expression> 
<gap>  <Sequence-expressi 


<gap>  <'#EQ'>  <gap> 

<gap>  <'#NEQ'>  <gap> 
<gap>  <*#EQS'>  <gap> 
<gap>  <'#NEQS’>  <gap> 
<gap>  <’#EQN'>  <gap> 
<gap>  <'#NEQN»>  <gap> 
<gap>  <'#EQW'>  <gap> 
<gap>  <'#NEQW'>  <gap> 
<gap>  <’='>  <gap> 

<gap>  <*#N'>  <gap>  <'=*> 


a #EQ  b 


<true> 

if 

<true> 

if 

( i • e • 1 

if 

y"); 

a and  b are  both  the  value  <undefined>; 

a and  B are  identical  string  values 
"x  »1S  ^STRING  4 y #IS  #STRING  4 x #EQW 
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<true>  if  a and  D are  both  <true>  or  are  both 
<false>  (i.e.,  if  "x  #IS  #BOOLEAN  4 y #15 
^BOOLEAN  A x #IFF  y"); 

<true>  if  a and  B are  the  same  identical  node 
(i.e.,  if  " X #IS  #NODE  A y #15  #NODE  A x #EQN 
y"); 


<true>  if  a and  B are  identical  sequences  (i.e,, 
if  "X  #15  #5EQUENCE  A y #15  #SEQUENCE  A x #EQ5 

y"); 


<false>  otherwise; 


a #NEQ  b 

<true>  if  "a  #EQ  b”  evaluates  to  <false>; 

<false>  otherwise. 

a #EQ5  b 

<error>  if  a (or  B)  is  not  a sequence; 

<false>  if  the  length  of  the  two  sequences  is 
not  the  same  (i.e.,  if  "#LENGTH(a)  #N= 
#LENGTH(b)") ; 

<true>  if  a and  B are  both  empty  sequences  (i.e., 
they  both  have  length  0),  or  if,  for  1 <=  i <= 
length  of  a,  "i  #TH-ELEMENT-IN  a #EQ  i 
#TH-ELEMENT-IN  b"  holds; 

<false>  otherwise. 

a #NEQ5  b 

<true>  (<false>)  if  and  only  if  "a  #EQ5  b” 
evaluates  to  <false>  (<true>); 

<error>  otherwise. 

a #EQN  b 


<error>  if  a (or  B)  is  not  a node; 

<true>  if  a and  B are  the  same  identical  node 
(c.f..  Chapter  II,  5ection  F "5equences  and  parse 
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trees" ) ; 

<false>  otherwise. 


a #NEQN  b 

<true>  (<false>)  if  and  only  if  "a  #EQN  b" 
evaluates  to  <false>  (<true>); 

<error>  otherwise. 

a #EQW  b 

<error>  if  a (or  D)  is  not  string  convertible; 

<true>  if  the  string  value  of  a is  identical  to 
the  string  value  of  D; 

<false>  otherwise. 

a #NEQW  b 

<true>  (<false>)  if  and  only  if  "a  #EQW  b" 
evaluates  to  <false>  (<true>); 

<error>  otherwise. 

a = b 

<error>  if  "a  #IS-NOT  ^INTEGER  #0R  b #IS-N0T 
//INTEGER"  holds; 

<true>  if  the  numbers  denoted  by  the  numerals  a 
and  B are  equal; 

<false>  otherwise. 

NOTE:  This  operator  tests  for  arithmetic 
equality;  it  could  be  defined  strictly  in  terms 
of  the  numeral  strings  S and  B,  but  such  a 
definition  seems  unnecessarily  obscure  for  the 
purposes  of  this  manual.  This  comment  applies  to 
all  the  arithmetic  operators  to  be  discussed 
below  as  well. 

a #N=  b 


Synonymous  with  "#NOT(a  r b)";  that  is, 
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<true>  (<false>)  if  and  only  if  "a 
to  <false>  (<true>); 

<error>  otherwise. 


= b"  evaluates 


#DF  Arithmetic-inequality 


= > <String-expression>  <gap>  <Less-than-on“*’^*^  •'>'> 
<gap>  <String-expression> 

=>  <String-expression>  <gap> 

<Greater-than-operator>  <gap>  <String-expression> 

it. 


#DF  Less-than-operator 


=>  <*<»> 


:>  <•<='>  #, 


#DF  Greater-than-operator 


=>  <•>•> 


=>  <’>=•>  #. 


a < b 


<error>  if  "a  #IS-NOT  ^INTEGER  #0R  b #IS-NOT 
//INTEGER"  holds; 

<true>  if  the  number  denoted  by  the  numeral  5 is 
less  than  the  number  denoted  by  b; 

<false>  otherwise. 


a <=  b 


Synonymous  with  ”#N0T(a  > b)";  that  is, 

<true>  (<false>)  if  and  only  if  "a  > b"  evaluates 
to  <false>  (<true>); 
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<error>  otherwise. 

<error>  if  "a  #IS-NOT  lINTEGER  #0R  b #IS-NOT 
#INTEGER'’  holds; 

<true>  if  the  number  denoted  by  the  numeral  a is 
greater  than  the  number  denoted  by  D; 

<false>  otherwise. 


Synonymous  with  "#NOT(a  < b)”;  that  is, 

<true>  (<false>)  if  and  only  if  ”a  < b”  evaluates 
to  <false>  (<true>); 

<error>  otherwise. 


i 
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II 


Sequence  Expressions 


II 


#DF  Sequence-expression 

=>  <Subsequence-expression> 
=>  <Sequence-concatenation> 


Sequence  expressions  have  sequences  as  their  result  values. 
A SEMAN0L(76)  sequence  is  a structured  object,  whose  elements 
may  be  any  object  of  any  type  discussed  in  Chapter  II,  Section 
C "SEMAN0L(76)  Data  Types”,  including  sequences.  However, 
SEMAN0L(76)  sequences  may  not  be  "re-entrant”  (i.e.,  none  of 
the  sequence  elements  of  a sequence  may  be  the  sequence  itself, 
nor  may  any  elements  of  a (sequence)  element  of  tne  sequence  be 
the  sequence  itself,  etc.).  The  "length"  of  a sequence  is  the 
number  of  elements  it  has;  there  exists  an  "empty”  sequence 
whose  length  is  0 — we  denote  the  empty  sequence  in  this 
manual  by  "<nilseq>”,  and  in  SEMANOL(76)  by  ”#NILSEQ”. 

The  elements  of  a sequence  are  strictly  ordered  by  the 
"Precedes”  relation;  we  assign  ordinal  positions  to  the 
elements  of  a sequence  as  follows:  the  first  element  of  a 
sequence  precedes  all  other  elements,  the  second  precedes  all 
others  except  the  first,  etc. 

Suppose  two  separate  evaluations  produce  X and  7,  each  of 
which  is  a sequence.  If  "#LENGTH(x)  = #LENGTH(y)”  and  ”i 
#TH-ELEMENT-IN(x)  //EQ  i #TH-ELEMENT-IN(y ) " for  all  i such  that 
"1  <=  i"  and  "i  <=  #LENGTH(x)",  then  X is  identical  to  y.  That 
is,  the  identity  of  a sequence  is  completely  determined  by  the 
order  and  the  identity  of  its  components.  Here  the  notion  of 
identity  is  defined  in  terms  of  the  SEMANOL(76)  operators  for 
equality  (the  node-,  sequence-,  string-,  and  numeric-equality 
relations ) . 
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#DF  Subsequence-expression 

=>  <’#SUBSEQUENCE-OF-ELEMENTS'>  <gap>  <Name> 
<gap>  <’#IN'>  <gap>  <Sequence-concatenation> 
<gap>  <'#SUCH-THAT’ > <gap>  <•('>  <gap> 
<Boolean-expression>  <gap>  <')•> 

= > < ' /^SUBEQUENCE' > <gap>  <String-expression> 
<gap>  <'#T0'>  <gap>  <String-expression>  <gap> 
<'#0F'>  <gap>  <Sequence-expression> 

=>  <»#INITIAL-SUBSEQ-OF-LENGTH'>  <gap> 
<String-expression>  <gap>  <'#0F'>  <gap> 
<Sequence-expression> 

=>  <'#TERMINAL-SUBSEQ-OF-LENGTH’>  <gap> 
<String-expression>  <gap>  <*#0F'>  <gap> 
<Sequence-expression> 


#SUBSEQUENCE-OF-ELEMENTS  b a ^SUCH-THAT  ( B ) 

<error>  if  "a  #IS-NOT  ^SEQUENCE"  holds,  or  if 
there  is  an  element,  D,  in  5 such  that  '’B[b]” 
evaluates  to  neither  <true>  nor  <false>; 

<nilseq>  if  there  is  no  element,  B,  in  a such 
that  "B[b]"  holds; 

Otherwise:  3,  the  sequence  formed  by  taking  the 
elements,  B,  of  a such  that  ”B[b]"  holds.  The 
order  of  the  elements  in  3 is  their  order  in  a 
(i.e.,  i^h^  #PRECEDES  b2  #IN  s //IMPLIES  b1 
//PRECEDES  b2  #IN  a"  holds). 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  x.  Also  see  Chapter  II,  Section  I. 

//SUBSEQUENCE  m #T0  n #0F  a 

<error>  if  ffl  (or  B)  is  not  an  integer  or  if  a is 
not  a sequence; 

<undefined>  if  ”m  > n"  or  "m  < 1"  or  ”n  > 

//LENGTH (a)"  ; 
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Otherwise:  the  subsequence  of  a beginning  with 
the  Hi-th  element  in  a and  ending  with  the  h-th 
element  in  a,  inclusive;  that  is,  the  sequence  B 
such  that  for  every  integer  i in  the  interval  1 
<=  i <=  n - m + 1,  "i  #TH-ELEMENT-IN  b //EQ  i + m 
-1  #TH-ELEMENT-IN  a"  holds. 

#INITIAL-SUBSEQ-OF-LENGTH  m #0F  a 

<error>  if  ffl  is  not  an  integer  or  if  a is  not  a 
sequence ; 

<undefined>  if  "m  > #LENGTH(a)''  or  "m  < 0"  ; 
<nilseq>  if  "m  = 0"; 

Otherwise:  The  sequence  formed  by  taking  as 
elements,  the  first  ffl  elements  of  5 in  order; 
i.e.,  the  sequence,  5,  such  that  ”LENGTH{b)  = m” 
and  there  exists  a (possibly  empty)  sequence  C 
such  that  *'b  #CS  c fiEQ  a”  holds;  that  is  for 
every  integer  i in  the  interval  1 <=  i <=  m, 
”i#TH-ELEMENT-IN  b ^EQ  i #TH-ELEMENT-IN  a"  holds. 

#TERMINAL-SUBSEQ-OF-LENGTH  m #0F  a 

<error>  if  ffl  is  not  an  integer  or  if  a is  not  a 
sequence ; 

<undefined>  if  "m  > #LENGTH(b)’'  or  if  "m  < 0”; 
<nilseq>  if  "m  = 0"; 

Otherwise:  The  sequence  formed  by  taking  as 
elements,  the  last  ffi  elements  of  a in  order; 
i.e.,  the  sequence,  B,  such  that  ”LENGTH(1)  = m" , 
and  there  exists  a (possibly  empty)  sequence  5 
such  that  "c  #CS  b #EQ  a”  holds;  that  is,  for 
every  integer  i in  the  interval  1 <=  i <=  m,  "i 
/)TH-ELEMENT-IN  b #EQ 

(#LENGTH(a)-m+i)#TH-ELEK..NT-IN  a”  holds. 


#DF  Sequence-concatenation 

=>  <Sequence-constructor>  <%<  <gap>  <'#CS'>  <F3p> 
<Sequence-constructor>>>  #. 
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a #CS  b 


<error>  if  a (or  D)  is  not  a sequence; 

Otherwise;  the  sequence  3 formed  by  concatenating 
a and  b;  that  is,  the  sequence  3 such  that  for 
every  i in  the  interval  1 <=  i <=  the  length  of 
a,  "i  #TH-ELEMENT-IN  a #EQ  i #TH-ELEMENT-IN  s" 
holds,  and  for  every  i in  the  interval  1 <=  i <= 
the  length  of  B,  "i  #TH-ELEMENT-IN  b //EQ  (i  + 
#LENGTH(a))  #TH-ELEMENT-IN  s”  holds. 

a1  #CS  a2  #CS  ...  #CS  an 

Synonymous  with  the  expression  "(...( (a  1 #CS  a2) 
#CS  a3)...#CS  an)";  that  is,  the  n-fold  sequence 
concatenation  of  ai  through  an  (<error>  if  any  of 
the  ai  is  not  a sequence). 


//DF  Sequence-constructor 

=>  < ' #SEQUENCE-OF ' > <gap>  <Syntactic-class-union> 
<gap>  <'#IN’>  <gap>  <String-expression> 

= > <'//SEQUENCE-OF-NODES-IN'>  <gap> 
<String-expression> 

=>  <'#SEQUENCE-OF-NODES'>  <gap>  <Name>  <gap> 
<'#IN'>  <gap>  <String-expression>  <gap> 
<'#SUCH-THAT'>  <gap>  <'('>  <gap> 
<Boolean-expression>  <gap>  <’)’> 

r>  <'#SEQUENCE-OF-ANCESTORS-OF’>  <gap> 

<St ring-expression > 

=>  <Strlng-expression> 


/fSEQUENCE-OF  <a1>  #IN  b 
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#SEQUENCE-OF  <a1>  #U  <a2>  #U  .../KU  <an>  b 

<error>  if  6 is  not  a parse  tree  node; 

Otherwise:  the  sequence  S formed  by  taking  as 
elements,  the  nodes,  Di,  (of  the  parse  tree  whose 
root  node  is  B)  which  have  a Syntactic-class-name 
tag  identical  to  one  of  the 

Syntactic-class-names,  ai  (cf,  the  discussion  of 
the  "^fCONTEXT-FREE-PARSE-TREE. . operator, 
below).  The  nodes  of  the  parse  tree  B at-o  to 
appear  in  the  sequence  S in  preorder  (i.e.,  if 
the  ordinal  position  of  Bi  is  less  than  that  of 
Bj  in  3,  then  Bi  would  be  listed  before  Bj  in  a 
preorder  listing  of  the  nodes  of  B.  This 
SEMANOL(76)  expression  is  equivalent  to 
'*#SUBSEQUENCE-OF-ELEMENTS  x #IN 
(//SEQUENCE-OF-NODES-IN  b)  #SUCH-THAT  ( x ffIS-IN 
<a1>  #U  <a2>  #U  ...#U  <an>)". 

NOTE:  A preorder  listing  of  the  nodes  of  a parse 
tree  is  one  given  by  the  following  procedure: 

1.  Write  a name  for  the  root  node  of  the 
tree; 

2.  For  each  descendant  node  (in  increasing 
seg-number  — i.e.,  lef t-to-right  — order), 
write  the  preorder  listing  of  the  nodes  in 
the  subtree  having  that  node  as  root. 

y/SEQUENCE-OF-NODES-IN  b 

<error>  if  B is  not  a parse  tree  node; 

Otherwise:  the  sequence,  3,  formed  by  taking  as 
elements,  in  preorder,  the  nodes  of  the  parse 
tree  whose  root  node  is  B.  If  Bi,  and  Bj  are 
nodes  in  the  parse  tree  B,  then  Bi  appears  before 
Bj  in  a preorder  listing  of  the  nodes  in  B if  and 
only  if  the  ordinal  position  of  Bi  is  less  than 
that  of  Bj  in  the  sequence,  3. 

NOTE:  A preorder  listing  of  the  nodes  of  a parse 
tree  is  one  given  by  the  following  procedure: 

1.  Write  a name  for  the  root  node  of  the 
tree ; 
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2.  For  each  descendent  node  (in  increasing 
seg-number  — i.e.,  left-to-right  — order), 
write  the  preorder  listing  of  the  nodes  in 
the  subtree  having  that  node  as  root. 

#SEQUENCE-OF-NODES  b #IN  a #SUCH-THAT  ( B ) 

<error>  if  a is  not  a parse  tree  node,  or  if 
there  is  a node,  D,  in  the  parse  tree  whose  root 
is  a,  such  that  B[b]  evaluates  to  neither  <true> 
nor  <false>; 

<nilseq>  if  there  is  no  node  B,  in  the  parse  tree 
whose  root  is  a,  such  that  ”B[b]”  holds; 

Otherwise:  S,  the  sequence  of  nodes,  B,  taken  in 
preorder  from  the  parse  tree  whose  root  is  3, 
such  that  "B[b]"  holds.  Thus  ”b1  #PRECEDES  b2 
#IN  s //IMPLIES  b1  #PRECEDES  b2  #IN  a”  holds. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 

This  SEMAN0L(76)  expression  is  equivalent  to 
"//SUBSEQUENCE-OF-ELEMENTS  b #IN 
(//SEQUENCE-OF-NODES-IN  a)  #SUCH-THAT  ( B[b)  )". 

NOTE:  A preorder  listing  of  the  nodes  of  a parse 
tree  is  one  given  by  the  following  procedure: 

1 . Write  a name  for  the  root  node  of  the 
tree ; 

2.  For  each  descendent  node  (in  increasing 
seg-number  — i.e.,  left-to-right  — order), 
write  the  preorder  listing  of  the  nodes  in 
the  subtree  having  that  node  as  root. 

<fSEQUENCE-OF-ANCESTORS-OF  n 

<error>  if  fl  is  not  a node; 

Otherwise:  the  sequence  , S,  formed  by  taking  as 
elements,  in  preorder,  those  nodes  B from  the 
most  inclusive  parse  tree  containing  B such  that 
"n  //IS  //NODE-IN  b #AND  n #NEQN  b”  holds. 
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This  is  equivalent  to  "<fSEQUENCE-OF-NODES  b #IN  ^ 

#ROOT-NODE  (n)  #SUCH-THAT  (n  #IS  #NODE-IN  b fCAND 

n INEQN  b)"  , 

I 

String-Expressions  * 


#DF  String-expression 
=>  <Substring-extractor> 

= > <Str  ing-concatenation>  ’ 

=>  <Position-detector> 

=>  <Sequence-element-extractor > 

=>  <Seg-selector>  ■ ; 

=>  <Sum>  #. 

#DF  Substring-extractor 

=>  <'#LEFT’>  <Sum>  <gap>  < ' #CHARACTERS-OF ' > <gap> 

<Str in g-ex press ion > 

=>  <'#RIGHT'>  <Sum>  <gap>  < ' ACHARACTERS-OF ' > 

<gap>  <String-expression> 

=>  <Sum>  <gap>  <’#TH-CHARACTER-IN'>  <gap> 

<S trin g-ex press! on > 

=>  <’#FIRST-CHARACTFR-IN'>  <gap> 

<Str in g-ex press ion > 

=>  <'#LAST-CHARACTER-IN'>  <gap> 

<Str ing-ex pres Sion > 

= > <'#SUBSTRING-OF-CHARACTERS'>  <gap>  <St-7i>  <gap> 

<'#T0'>  <gap>  <Sum>  <gap>  <'<I0F’>  <gap> 
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<St ring-ex press ion > 

=>  <'#PREFIX-OF-FIRST'>  <gap>  <Sum>  <gap>  <'#IN'> 
<gap>  <String-expression> 

=>  <’#SUFFIX-OF-FIRST'>  <gap>  <Sum>  <gap> 

<gap>  <String-expression> 


#LEFT  m #CHARACTERS-OF  b 

<error>  if  (B  is  not  an  integer  or  if  6 is  not 
string  convertible; 

<undefined>  if  "m  > #LENGTH(b)''  or  "m  < 0”; 

<nil>  if  "m  = 0” ; 

Otherwise:  the  string  C,  such  that  5 is  the 

initial  substring  of  B of  length  (B.  That  is,  the 
string  given  by  "//SUBSTRING-OF-CHARACTERS  1 #T0  tn 
»0F  b". 

[Examples : 

'’#LEFT  3 #CHARACTERS-OF  ( ’ HI-THERE ! ' ) denotes 
"HI-". 

"//LEFT  q #CHARACTERS-OF  ( 'OOPS’  )”  denotes 
<undefined>  if  "q  > 4"  or  if  "q  < 0",  and  denotes 
"OOP"  if  "q  = 3".] 

//RIGHT  m //CHARACTERS-OF  b 

<error>  if  ffl  is  not  an  integer  or  if  B is  not 
string  convertible; 

<undefined>  if  "m  > #LENGTH(b)"  or  "m  < 0"; 

<nil>  if  "m  = 0"; 

Otherwise:  the  string  B,  such  that  5 is  the 

rightmost  substring  of  B of  length  ffi.  That  is, 
the  string  given  by  "//SUBSTRING-OF-CHARACTERS 
#LENGTH(  b)  - m + 1 #T0  #LENGTH(  b)  #0F  b". 


[Examples : 
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''#RIGHT  3 fCHARACTERS-OF  ( ' FEE-FI-FO-FUM ' )" 
denotes  "FUM". 

''#RIGHT(#LENGTH(ix)  - 1)  #CHARACTEPS-OF  ix" 
denotes  <undefined>  if  "#LENGTH(ix)  < 1”,  and 
<nil>  if  "LENGTH(ix)  = 1";  otherwise,  it  denotes 
the  string  formed  from  iX  by  dropping  its  first 
character . ] 

m /fTH-CHARACTER-IN  b 

<error>  if  ftl  is  not  an  integer  or  if  D is  not 
string  convertible; 

<undefined>  if  "m  < 1”  or  "m  > #LENGTH(b)”; 

Otherwise:  e,  where  ft  is  a string  of  length  1 
consisting  of  the  ft-th  character  in  ft  counting 
from  the  left  and  starting  the  count  at  1 . 

[Example: 

"2  #TH-CHARACTER-IN  'pig'"  denotes  "i'M 
#FIRST-CHARACTER-IN  b 

<error>  if  B is  not  string  convertible; 
<undefined>  if  B is  <nil>,  the  empty  string; 
Otherwise:  the  leftmost  character  of  B 
[This  is  equivalent  to  "1  #TH-CHARACTER-IN  b''] 
/fLAST-CHARACTER-IN  b 

<error>  if  B is  not  string  convertible; 
<undefined>  if  B is  <nil>,  the  empty  string; 
Otherwise:  the  rightmost  character  of  B 
[This  is  equivalent  to 
"(//LENGTH  (b))  #TH-CHARACTER-IN  b" 
#SUBSTRING-OF-CHARACTERS  m //TO  n flOF  b 
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<error>  if  ffl  (or  ft)  is  not  an  integer  or  if  B is 
not  string  convertible; 

<unclefined>  if  "m  > n"  or  "m  < 1"  or  "n  > 
#LENGTH(b)"; 

Otherwise:  C where  C is  the  substring  of  B 

beginning  with  the  ffi-th  character  of  B and  ending 
with  the  n-th  character  of  B,  inclusive  (the 
count  is  from  left  to  right,  beginning  at  1). 

[Example : 

"#SUBSTRING-OF-CHARACTERS  2 #T0  3 #0F  'abed'" 
denotes  "be".] 

#PREFIX-OF-FIRST  b #IN  a 

<error>  if  B (or  a)  is  not  string  convertible; 

<undefined>  if  B is  not  a substring  of  3; 

<nil>  if  B is  an  initial  substring  of  a or  if  "b 
<fEQW  #NIL"; 

Otherwise:  C where  B is  the  initial  substring  of 
a ending  at  (but  not  including)  the  first 
character  of  the  first  occurrence  of  B (scanning 
from  the  left). 

[Examples: 

"//PREFIX-OF-FIRST  'X'  #IN  'aaXXX'"  denotes  "aa"; 

"//PREFIX-OF-FIRST  ','  #IN  alist"  denotes  the 
initial  substring  of  string  allst  ending  just 
before  the  first  comma  (if  there  is  one).] 

#SUFFIX-OF-FIRST  b #IN  a 

<error>  if  B (or  a)  is  not  string  convertible; 

<undefined>  if  B is  not  a substring  of  3; 

<nil>  if  the  first  occurrence  of  B in  a (scanning 
from  the  left)  is  a right-most  substring  of  3; 

a if  "b  #EOW  //NIL"; 


i 


i 

I 
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Otherwise:  C where  C is  the  right-most  substring 
of  a beginning  at  the  character  immediately  after 
the  last  character  of  the  first  occurrence  of  D 
in  a. 


[Examples: 

•’/fSUFFIX-OF-FIRST  'a'  #IN  ’aaXXX'"  denotes 
"aXXX"; 

"#SUFFIX-OF-FIRST  #IN  alist"  denotes  tv>e 
right-most  string  of  alTst  beginning  just  ai  o<.-r 
the  first  comma  (if  there  is  one).] 


#DF  String-concatenation 


= > <Sum>  <gap>  <5(1<<’//CW’>  <gap>  <Sum>>> 


a #CW  b 


<error>  if  a (or  B)  is  not  string  convertible; 

Otherwise:  5 where  B is  the  string  obtained  by 
concatenating  a and  B. 

[ Example : 

'"A'  #CW  'WFUL'"  denotes  "AWFUL"] 

[Note:  If  several  concatenations  are  specified 

in  an  expression  with  no  order-imposing 
parenthesization , concatenation  takes  place  from 
left-to-right . ] 

[Note:  Since  all  numerals  are  also  strings,  all 

the  string  functions  may  be  applied  to  them, 
also. ] 
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/fDF  Position-detector 

=>  <'#SUBSTRING-POSIT-OF'>  <gap>  <Sum>  <gap> 
<'#IN'>  <gap>  <String-expression> 

=>  <’#ORDPOSIT'>  <gap>  <Sum>  <gap>  <'#IN’>  <gap> 
<String-expression>  #. 


#SUBSTRING-POSIT-OF  a #IN  b 

<error>  if  3 (or  D)  is  not  string  convertible; 

<undefined>  is  3 is  not  a substring  of  D or  if  "a 
#EQW  iifNIL"; 

Otherwise:  C,  where  5 is  the  integer 
corresponding  to  the  first  character  position  at 
which  3 matches  (is  identical  to)  a substring  of 

B. 

[Example: 

"#SUBSTRING-POSIT-OF  ’a’  #IN  'cat"'  denotes  "2".] 

#ORDPOSIT  a #IN  b 

<error>  if  B is  not  a sequence; 

<undefined>  if  element  3 is  not  to  be  found  in 
sequence  B (i.e.,  if  <fFOR-ALL  x #IN  b 
//IT-IS-TRUE-THAT  (x#NE0  a)”  holds); 

Otherwise:  C,  where  B is  a decimal  numeral 
denoting  the  order  position  of  the  first 
occurrence  of  element  3 in  sequence  B (counting 
from  1 ) . 
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tfDF  Sequence-element-extractor 

= > <Sum>  <gap>  <’/fTH-ELEMENT-IN’>  <gap> 
<String-expression> 

=>  <»#FIRST-ELEMENT-IN’>  <gap> 

<Strirg-expression> 

= > <'#LAST-ELEMENT-IN’>  <gap>  <String-exr’-ession> 

= > «'#FIRST'>  #U  <*#LAST'>  #U  «Sum>  <gap> 
<'#TH'>>>  <gap>  <Name>  <gap>  <gap>  <Sum> 

<gap>  <Such-that-clause> 

s>  <<’#FIRST’>  <'<!fLAST*>  #U  «Sum>  <gap> 

<'#TH'>>>  <gap>  <Name>  <gap>  <gap> 

<Bounded-interval>  <gap>  <Such-that-clause>  if. 

IDF  Such-that-clause 

=>  <'#SUCH-THAT'>  <gap>  <•(•>  <gap> 
<Boolean-expression>  <gap>  <•)’>  I. 


n #TH-ELEMENT-IN  b 

<error>  if  ft  is  not  a sequence  or  if  ft  is  not  in 
the  integer  range. 

<undefined>  if  "n  < 1”  or  "n  > ILENGTH(b)". 
Otherwise:  the  ftth  element  in  the  sequence  ft. 
IFIRST-ELEMENT-IN  b 

<error>  if  ft  is  not  a sequence. 

<undefined>  if  ft  has  length  0; 

Otherwise:  the  first  element  in  the  Sequence  ft. 

[This  is  equivalent  to  "1  #TH-ELEMENT-IN  b” . ] 
#LAST-ELEMENT-IN  b 
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<error>  if  D is  not  a sequence; 

<undefined>  if  D has  length  0; 

Otherwise:  the  last  element  in  the  Sequence  B. 

[This  is  equivalent  to  "#LENGTH(b)  #TH-ELEMENT-IN 
b”.  ] 


n #TH  b #IN  s #SUCH-THAT(B) 

<error>  if  3 is  not  a sequence  or  Pi  is  not  an 
integer ; 

<undefined>  if  there  are  fewer  than  Pi  elements, 

P5,  of  C such  that  ''B[b]”  evaluates  to  <true>,  and 
all  the  others  are  such  that  "B[b]”  evaluates  to 
<false> ; 

D,  the  element  in  5 such-that  "B[b]”  evaluates  to 
<true>  and  there  are  Pi  - 1 elements,  3,  preceding 
D in  5 such  that  ''B[b]"  evaluates  to  <true>,  and 
each  other  element  9,  preceding  B in  5 is  such 
that  "B[d]"  evaluates  to  <false>,  if  there  is 
such  a B; 

<error>  otherwise. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  t.  Also  see  Chapter  II,  Section  I. 

//FIRST  b #IN  s //SUCH-THAT(B) 

<error>  if  3 is  not  a sequence. 

<undefined>  if  every  element,  B,  of  B is  such 
that  "B[b]"  evaluate  to  <false>; 

B,  the  element  of  B such  that  "B[b]"  evaluates  to 
<true>  and  each  element,  3,  preceding  B in  B,  is 
such  that  ''B[a]”  evaluates  to  <false>,  if  there 
is  such  a B; 

<error>  otherwise. 

More  precisely,  this  keyword  expression  is 
equivalent  to  "1  #TH  b #IN  s #SUCH-THAT  (B)*'. 
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Note;  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 

#LAST  b #IN  s SUCH-THAT(B) 

<error>  if  3 is  not  a sequence. 

<undefined>  if  every  element,  D,  of  5 is  such 
that  "B[b]''  evaluates  to  <false>; 

B,  the  element  of  5 such  that  ''B[b]"  evaluates  to 
<true>  and  each  element,  3,  following  B in  B,  is 
such  that  ”B[a]"  evaluates  to  <false>,  if  there 
is  such  a B; 

<error>  otherwise. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 


. n #TH  b : a <=  b <=  c <fSUCH-THAT  ( B ) 

<error>  if  "a  #IS-NOT  #INTEGER  #0R  c #IS-NOT 
//INTEGER”  holds; 

<undefined>  if  there  are  fewer  than  h integers, 
B,  a <r  B <=  S,  such  that  ”B[b]”  holds,  and  all 
the  others  are  such  that  //B[b]"  evaluates  to 
<false> ; 

The  minimal  integer,  B,  3 <=  B <=  5 such  that 
there  are  fS  integers,  d,  a <=  d <=  B such  that 
”B[d]”  holds,  and  every  other  5,  a <=  S <=  B is 
such  that  ”B[e]”  evaluates  to  <false>,  if  there 
is  such  a D; 

<error>  otherwise. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 


This  keyword  expression  is  equivalent  to 


r 
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given : 

#DF  sequence-of-integers  (a,c) 

=>  #ERROR  #IF  a #IS-NOT  fINTEGER  #0R  c #IS-NOT 
#INTEGER; 

=>  fNILSEQ  »1F  a > c; 

=>  \a\  #CS  sequen  ®-of-integers  (a  + 1,  c) 
fOTHERWISE  #. 

#FIRST  b : a <=  b <=  c #SUCH-THAT  ( B ) 

<error>  if  "a  #rS-NOT  IIMTEGER  #0R  b #IS-NOT 
/UNTEGER”  holds; 

<undefined>  if  every  integer  D,  a <=  B <=  C is 
such  that  "R[b]”  evaluates  to  <false>; 

The  (minimal)  integer,  B,  a <=  B <=  5 such  that 
''B[b]”  holds,  and  all  other  integers  B,  a <=  B < 

B (if  any)  are  such  that  "B[d]”  evaluates  to 
<false>,  if  there  is  such  a B; 

<error>  otherwise. 

Note:  B[x]  is  B with  every  occurrence  of  the 
dummy  variable  name  replaced  with  x,  a constant 
denoting  X.  Also  see  Chapter  II,  Section  I. 

More  precisely,  this  keyword  is  equivalent  to 

"1  #TH  b : a < = b < = c #SUCH-THAT(B) " . 

#LAST  b : a <r  b <=  c #SUCH-THAT  ( B[b]  ) 

<error>  if  "a  )?IS-NOT  ^INTEGER  #0R  b #IS-NOT 
^INTEGER"  holds; 

<undefined>  if  every  integer  B,  a<=B<=Bis 
such  that  "B[b]"  evaluates  to  <false>; 

the  (maximal)  integer,  B,  a<=B<re  such  that 
''B[b]"  holds,  and  all  others  B,  B < B < = B (if 
any)  are  such  that  ''B[d]”  evaluate  to  <false>,  if 
there  is  such  a B; 


I 


I 
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<error>  otherwise. 

5 . Note;  B[x]  is  B with  every  occurrence  of  the 

dummy  variable  name  replaced  with  x,  a constant 
' denoting  t.  Also  see  Chapter  II,  Section  I. 

This  keyword  expression  is  equivalent  to 

"#LAST  b #IN  sequence-of-integers  (a,c) 
#SUCH-THAT(B)”, 

where  "sequence-of-integers  (a,c)"  is  defirieu  in 
the  explanation  for  "n  #TH  b;a<=b<=c 
//SUCH-THAT  (B)",  above 
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#DF  Seg-selector 

=>  <'#SEG'>  <gap>  <Sum>  <gap>  <'#0F'>  <gap> 
<String-expression>  #. 


j //SEG  n #0F  p 

I <error>  if  p is  not  a parse  tree  node,  or  fJ  is 

^ not  an  integer; 

I <undefined>  if  node  p has  ffi  direct  descendents 

and  "n  > m"  or  if  "n  < 1”; 

Otherwise:  The  fith  descendent  of  node  p 

' (counting  from  the  left  from  1).  p is  thus  a 

parse  tree  node,  possibly  a terminal  one. 

[Example:  "Standard-name( #SEG  1 #OF(#SEG  1 #0F 
1 stmnt))"  starts  at  the  node  stfflnt , finds  its 

leftmost  descendent  and  then,  in  turn,  finds  its 
"first”  descendent.] 

[Note:  Normally,  the  SEG's  of  a node  correspond 
to  the  set-concatenands  in  one  of  the 
alternatives  of  the  node's  Syndef.] 
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#DF  Sum 

=>  <'#NEG'>  <gap>  <Product> 

<X<<Add iti ve-operator>  <Product>>> 

=>  <Product>  <%<< Add iti ve-operator>  <Product>>> 

fiDF  Additive-operator 

= > <gap>  , ’#BOR' , '«fBXOR'>  <gap> 

=>  <special-gap>  <special-gap>  #. 

/fDF  Special-gap 

=>  <%1<#SPACE>> 

=>  <#GAP>  <Special-delimiters>  <^G^P> 


Note:  Also  see  Chapter  II,  Section  H,  ”SEMANOL(76) 

Arithmetic” . 

Integer  arithmetic 

#NEG  a 

<error>  if  3 is  not  an  integer; 

Otherwise:  the  standard  form  integer  numeral 
which  is  the  negation  of  a,  in  the  same  base  as 
a.  That  is,  if  a has  a leading  minus  sign,  it  is 
erased;  otherwise,  it  is  added. 


<error>  if  a (or  D)  is  not  an  integer; 

Otherwise:  the  standard  form  integer  numeral,  8, 
for  the  sum  of  numbers  denoted  by  a and  B.  If 
the  bases  of  a and  D differ,  the  base  of  8 is  the 
minimum  of  the  two  bases;  otherwise  the  base  of  8 
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a - b 

<error>  if  a (or  D)  is  not  an  integer; 

Otherwise:  the  standard  form  integer  numeral,  2,  1 

I for  the  difference  of  numbers  denoted  by  a and  B. 

If  the  bases  of  a and  B differ,  the  base  of  2 is  j 

i the  minimum  of  the  two  bases;  otherwise  the  base 

of  2 is  that  of  a. 

I 

Bit-string-arithmetic 

a #BOR  b I . 

<error>  if  a (or  B)  is  not  a bit-string? 

1 

1 

I Otherwise:  the  bit  string  numeral,  e,  obtained  by  I 

(1)  padding  with  leading  zeros  the  shorter  \ ; 

of  a and  B;  /j 

(2)  constructing  a result  numeral  2 using  , | 

I bit-wise  inclusive-or  logic,  given  in  the  i | 

table  below.  1 j 

(i-th  bit  in  a)  ! | 


+ 1 

1 

0 

1 

0 ! 

0 

1 

(i-th  bit  in  B) 

1 

1 

1 1 

1 

1 

[Example:  j 

; 

"110//BITS  #BOR  10101#BITS"  evaluates  to 

"101 1 1 //BITS”]  I 

a #BX0R  b ' I 

<error>  if  3 (or  B)  is  not  a bit-string; 

I I 

Otherwise:  The  bit  string  constant,  2,  obtained  i 

by  ! I 


(1)  padding  with  leading  zeros  the  shorter 
of  a and  B; 
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(2)  constructing  a result  numeral  using 
bit-wise  exclusive-or  logic,  as  given  in  the 
table  below: 


[Example 


110#BITS  #BXOR  10101/fBITS”  evaluates  to 
100 11 //BITS"] 


#DF  Product 


=>  <Primary>  <%<  <gap>  <Multiplicative-Qperator> 
<gap>  <Primary>>>  . 


#DF  Multiplicative-operator 


> <'//BAND'>  # 


Integer  arithmetic 


<error>  if  3 (or  B)  is  not  an  integer 


Otherwise:  the  standard  form  integer  numeral,  C, 
for  the  product  of  numbers  denoted  by  a and  B. 

If  the  bases  of  a and  B differ,  the  base  of  B is 
the  minimum  of  the  two  bases;  otherwise  the  base 
of  e is  that  of  a. 


- 

1 

1 

1 

0 

1 

0 

1 

I 

I 

0 

1 

1 

1 

1 

1 

1 

0 
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<error>  if  3 (or  D)  is  not  an  integer; 

<undefined>  if  "#SIGN(b)  =0”; 

Otherwise:  the  standard  form  integer  numeral,  5, 
for  the  "integer  portion"  of  the  quotient  of 
numbers  denoted  by  3 and  D.  If  the  bases  of  3 
and  D differ,  the  base  of  5 is  the  minimum  of  the 
two  bases;  otherwise  the  base  of  5 is  that  of  3. 

Note:  This  is  truncated  division;  thus  "3/2" 
evaluates  to  "1"  and  "(-3)/2"  evaluates  to  "-1". 

Bit-string-arithmetio 

a fBAND  b 


<error>  if  3 (or  B)  is  not  a bit-string; 


Otherwise:  the  bit  string  constant,  5,  obtained 
by 


(1)  padding  with  leading  zeros  the  shorter 
of  3 and  B: 

(2)  constructing  a result  numeral  using 
bit-wise  and  logic  as  given  in  the  table 
below : 


(i-th  bit  in  B) 


(i-th  bit  in  3) 


» 

1 

1 

1 

0 

1 

0 

1 

1 

1 

0 

0 

1 

1 

1 

1 

0 

1 

[Example : 

"110//BITS  AND  10101#BITS"  evaluates  to 
"00100#BITS"] 


#DF  Primary 


=>  <•(’>  <gap>  <Expression>  <gap>  <’)’> 
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=>  <Semantic-def-reference> 


=>  <Special-function> 
=>  <Numer ic-function> 


r 

t- 


=>  <Sequence-function> 

=>  <Str ing-constant> 

=>  <Numer ic-constant> 

=>  <Boolean-constant> 

=>  <Sequence-constant> 

=>  <Undef ined-constant> 

=>  <Name>  #. 

PDF  Semantic-def-reference 

=>  <Semantic-def inition-name>  <gap>  <’('>  <gap> 
<Expression>  <gap>  <!K<Comma>  <gap>  <Expression> 
<gap>>>  <')’> 

=>  <’($*>  <gap>  <Expression>  <gap>  <%<<Comma> 
<gap>  <Expression>  <gap>  >>  <'$)'>  <gap> 
<Semantic-def inition-name>  P. 


c 

c ( a1  , . . . , an  ) 

($  a1 , . . . , an  $)  c 

<error>  if  there  is  no  semantic  definition  in  the 
SEMAN0L(76)  program  with  the  semantic  definition 
name  "c”. 


Otherwise:  the  result  of  evaluating  the  semantic 
definition  reference  as  described  in  the 
discussion  of  <Semantic-def inition>  above. 


i 


83 


SEMAN0L(76)  Reference  Manual 
III.  Description  of  SEMANOL(76) 


#DF  Special-function 

I 

=>  <External-function> 

i i 

I =>  <Assignment-function> 

; =>  <File-manipulation> 

I =>  <Tree-function>  #. 


I 

i 


#DF  External-function 

=>  <'^EXTERNAL-CALL-OF'>  <gap> 
<String-expression> 

=>  <'#EXTERNAL-CALL-OF'>  <gap> 
<String-expression>  <gap>  < ' )!fWITH-ARGUMENT  ’ > 
<gap>  <’(’>  <gap>  <Sequence-expression>  < gap> 
< ' ) ’>  #. 


//EXTERNAL-CALL-OF  a 

#EXTERNAL-CALL-OF  a #WITH-ARGUMENT  (\b1 , . . . , b2\ ) 

#EXTERNAL-CALL-OF  a #WITH-ARGUMENT  ( b ) 

<error>  if  a (or  Bl,...,or  6n)  is  not 
string-convertible,  or  if  B is  not  a (possibly 
empty)  sequence  of  string-convertible-objects. 

<error>  If  any  error  condition  results  from  a 
call  to  an  (external)  function  having  as  its  name 
the  string  value  of  a,  and  as  its  arguments  the 
string  values  of  b1  through  bn.  An  error 
condition  includes  the  following:  (1)  the 
external  function  returns  a non-string  result; 


I 


« . 
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(2)  the  external  function  is  not  available  in  the 
environment  of  the  executing  SEMANOL(76)  program 
when  the  call  is  made  (i.e.,  the  call  cannot  be 
completed) ; 

Otherwise:  the  string  result  of  calling  an 
available  external  function  having  as  its  name 
the  string  value  of  a,  and  as  its  arguments  the 
string  values  of  bl  through  bn. 


#DF  Assignment-function 

r>  <' //LATEST-VALUE’ > <gap>  <’(’>  <gap> 
<String-expression>  <gap>  <’)’> 

=>  <'#ASSIGN-LATEST-VALUE*>  <gap>  <’(*>  <gap> 
<String-expression>  <gap>  <Comma>  <gap> 
<Expre3Sion>  <gap>  <’)'>  #.  #. 


#LATEST-VALUE  (a) 

<error>  if  a is  not  string-convertible; 

Otherwise:  V,  where  s is  the  string-value  of  a 
and  (s,9)  is  the  most  recently  added  pair  (which 
has  first  element  s)  to  the  global  assignment 
sequence . 

#ASSIGN-LATEST-VALUE  (a,b) 

<erro’“>  if  a is  not  string-convertible; 

Otherwise:  the  result  value  is  <nil>;  as  a side 
effect  of  evaluation,  the  pair  (s,t5)  is  added  to 
the  global  assignment  sequence,  where  s is  the 
string-value  of  a. 


#DF  File-manipulation 

=>  <»#INPUT'> 
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= > <»)!(OUTPUT'>  <gap>  <•('>  <gap> 
<String-expression>  <gap>  <’)'> 

=>  <'#GIVEN-PROGRAM' > #. 


#INPUT  #INPUT  denotes  a special  argumentless  function 

which  returns  the  value  of  a unique  special 
input  variable.  This  variable  is  assigned  a 
string  value,  implicitly,  prior  to  the 
execution  of  the  SEMANOL(76)  program;  it  cannot 
be  modified  during  execution. 

#GIVEN-PROGRAM  #GI VEN-PROGRAM  denotes  a special  argumentless 
function  which  returns  the  value  of  a unique 
special  given-program  input  variable.  This 
variable  is  assigned  a string  value, 
implicitly,  prior  to  the  execution  of  the 
SEMAN0L(76)  program;  it  cannot  be  modified 
during  execution. 

y/OUTPUT  (s)  <errcr>  if  3 is  not  string  convertible; 

Otherwise:  #OUTPUT  denotes  a special  function 
which  returns  the  value  <nil>,  and  as  a side 
effect,  concatenates  5 to  the  rightmost  end  of 
the  latest  string  value  of  a unique  special 
output  variable,  and  assigns  the  resulting 
string  as  the  (new)  latest  value  of  the  special 
output  variable.  This  variable  always  has  the 
value  <nil>  at  the  initiation  of  the  execution 
of  the  SEMAN0L(76)  program;  it  can  only  be 
altered  by  the  "^OUTPUT"  function. 

[Note:  The  exact  manner  in  which  the  implicit 
assignments  are  made  to  the  two  special  input 
variables  depends  upon  the  particular 
SEMAN0L(76)  Implementation,  as  does  the  exact 
mechanism  by  which  the  value  of  the  special 
output  variable  may  be  inspected.] 
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#DF  Tree-function 

=>  <»#CONTEXT-FREE-PARSE-TREE'>  <gap>  <»(•>  <gap> 
<String-expression>  <gap>  <Comma>  <gap> 
<Syntactlc-class-reference>  <gap>  <')'> 

=>  <*#STRING-OF-TERMINALS-OF»>  <gap>  <»(•>  <gap> 
<String-expression>  <gap>  <*)'> 

=>  <’#PARENT-NODE'>  <gap>  <'(’>  <gap> 
<String-expression>  <gap>  <')'> 

=>  <• ^ROOT-NODE' > <gap>  <•(•>  <gap> 
<String-expression>  <gap>  <•)*> 


#CONTEXT-FREE-PARSE-TREE  (a,<b>) 

<error>  if  a is  not  string-convertible  or  if  b is 
not  a syntactic  definition  name  for  a syntactic 
definition  in  the  context  free  syntax  section; 

<error>  if  the  grammar  G(b),  with  start  symbol  b, 
is  ambiguous  with  respect  to  the  string  value  of 
a (See  Section  3 in  Appendix  A); 

<undefined>  if  the  string  value  of  a cannot  be 
derived  from  the  start  symbol  b of  the  grammar 
G(b); 

Otherwise:  The  ordered  parse  tree  obtained  by 
parsing  the  string  value  of  a with  respect  to  the 
grammar  G(b)  to  be  found  in  the  context  free 
syntax  section.  Actually,  the  result  value  of 
this  operation  is  the  root  node  for  the  parse 
tree,  from  which  the  rest  of  the  tree  is 
accessible  via  other  SEMANOL(76)  functions. 

Complete  definition  of  the  construction  of  the 
parse  tree  is  given  in  the  discussion  in  Appendix 

A. 

The  SEMAN0L(76)  parse  tree  has  a few  extensions 
over  the  most  common  notions  of  a parse  tree; 
each  non-terminal  node  has  certain  special  labels 
or  attributes:  (1)  syntactic  class  name,  (2)  ease 
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(or  definiens)  number,  (3)  seg  count,  and  (4) 
syntactic  component  pairs. 

Each  non-terminal  node  corresponds  to  a 
(sub)string  of  the  parsed  string,  which  belongs 
to  a syntactic  class  defined  by  a syntactic 
definition  (whose  name  is  recorded  as  a label  on 
the  node).  Each  of  its  immediate  descendants 
(”seg”s)  correspond  to  a syntactic  set  (with  a 
terminal  or  non-terminal  syntactic  class  name) 
concatenand  in  one  of  the  definiens  of  the 
definition.  The  segs  of  a node  are  ordered 
(left-to-right ) , and  are  given  numbers  from  1 to 
the  seg-count  of  the  node.  The  definiens  used  to 
produce  the  descendents  is  labeled  (by  case 
number)  in  the  parent  node;  the  total  number  of 
segs  is  also  labeled  in  the  parent  node. 


#STRING-OF-TERMINALS-OF  (a) 


#R00T-N0DE(b) 


<error>  if  a is  not  a parse  tree  node; 

Otherwise:  The  string,  x,  represented  by  a as 
described  in  Section  5 of  the  discussion  in 
Appendix  A. 


<error>  if  "b  #IS-NOT  #NODE''  holds; 

Otherwise:  the  unique  node,  in  the 

(roost-inclusive)  parse  tree  containing  B,  which 
has  no  parent;  i.e.,  that  node  3 such  that  all 
nodes  B in  the  parse  tree  containing  B have  the 
property  that  "c  #IS  #NODE-IN  a". 

Note:  A parse  tree  3 "includes"  parse  tree  B if 
every  node  contained  in  B is  contained  in  3. 

Also,  a "properly  includes"  B if  3 includes  B and 
there  is  some  node  B contained  in  3 which  is  not 
contained  in  B.  A parse  tree  is  "most-inclusive" 
if  it  is  not  properly  included  in  any  parse  tree. 
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#PARENT-NODE(b) 


<error>  if  "b  #IS  NOT  #NODE"  holds; 

<error>  if  "b  #EQN  #ROOT-NODE(b ) " holds; 

Otherwise;  the  unique  node,  a,  in  the 
(most-inclusive)  parse  tree  containing  b,  for 
which  there  is  an  integer  1 such  that  "b  #EQN 
#SEG  i #0F  a”  holds. 

This  keyword  expression  is  equivalent  to 

"#LA:.T-ELEMENT-IN  (#SEQUENCE-0F-ANCEST0RS-0F  b)". 

Note:  A parse  tree  a "includes"  parse  tree  D if 
every  node  contained  in  b is  contained  in  8. 

Also,  a "properly  includes"  b if  a includes  b and 
there  is  some  node  C contained  in  a which  is  not 
contained  in  b,  A parse  tree  is  "most-inclusive" 
if  it  is  not  properly  included  in  any  parse  tree. 


#DF  Numeric-function 


=>  Arithmetic-function 


:>  Count-length-function 


#DF  Arithmetic-function 


=>  <'#ABS*>  <gap>  <'(*>  <gap>  <String-expres3lon> 
<gap>  <*)'> 

=>  <’#SIGN'>  <gap>  <•(•>  <gap> 

<String-expression>  <gap>  <’)*> 

=>  <'#C0NVERT'>  <gap>  <'2',  '8',  '10'>  <gap> 

<'('>  <gap>  <String-expression>  <gap>  <*)*>  #. 


#ABS  (a) 


<error>  if  a is  not  an  integer; 
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Otherwise;  the  standard  form  numeral  obtained 
from  5 by 

(1)  converting  a to  standard  form,  and 

(2)  taking  § if  3 has  no  leading  minus  sign; 
otherwise 

(3)  erasing  the  leading  minus  sign  of  a. 


#SIGN  (a) 


<error>  if  a is  not  an  integer; 

Otherwise:  the  (standard  form  decimal  integer) 
numeral  given  below: 

"0”  if  "a  = x”  where  S is  a standard  form 
' zero  of  the  same  numeric  type  as  3; 

”-1”  if  a has  a leading  minus  sign; 

”1”  otherwise. 

#C0NVERT  b (m)  , where  b is  2,  8,  or  10 

<error>  if  ffi  is  not  an  integer; 

Otherwise:  the  base  b standard  form 
representation  of  ffi. 


#DF  Count-length-function 


=>  <’#SEG-C0UNT'>  <gap>  <’ (’>  <gap> 
<String-expression>  <gap>  <•)'> 

=>  <’#LENGTH'>  <gap>  <•(•>  <gap> 
<Sequence-expression>  <gap>  <')*>  #■ 


#SEG-C0UNT  (a) 


<error>  if  a is  not  a parse  tree  node; 
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0 if  a is  a terminal  node  (i.e.,  if  a corresponds 
to  one  of  the  Syntactic  set  constants  in  the 
parse  of  a given  (sub)string  — see  the 
discussion  of  the  "#CONTEXT-FREE-PARSE-TREE . . . « 
operator,  above). 

Otherwise:  The  standard  form  decimal  integer 
numeral,  n,  such  that  a has  n immediate 
descendants  in  the  parse  tree  of  which  a is  the 
root  (see  the  discussion  of  the 
"♦CONTEXT-FREE-PARSE-TREE. . operator,  above). 

#LENGTH  (a) 

<error>  if  neither  of  the  following  conditions 
holds : 

(1)  1 is  a sequence;  (2)  a is  string  convertible. 
CASE  1 (a  is  a sequence) 

The  standard  form  integer  numeral  n,  where  h is 
the  number  of  elements  in  a.  (”0"  if  a is  the 
empty  sequence  <nilseq>.) 

CASE  2 (a  is  string  convertible) 

The  integer  numeral  n,  where  Fi  is  the  numbqr  of 
characters  in  the  string  value  of  a (”0"  if  the 
string  value  of  a is  <nil>). 


#DF  Sequence-function 

= > <• //REVERSE-SEQUENCE' > <gap>  <•  ('>  <gap> 
<Sequence-expression>  <gap>  <’)*>  #. 


#REVERSE-SEQUENCE  (f) 

<error>  if  S is  not  a sequence; 


Otherwise : 
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<nilseq>  if  S is  <nilseq>  ; otherwise, 

The  sequence  obtained  by  taking  the  elements  of  S 
in  reverse  order. 


#DF  Undefined-constant 

=>  <'#UNDEFINED'>  #. 

#DF  Boolean-constant 

=>  <'#TRUE' , '#FALSE’>  #. 

#DF  Sf.quence-constant 

=>  <’#NILSEQ'> 

=>  <'\'>  <gap>  <Expression>  <gap>  <^<<Comma> 
<gap>  <Expression>  <gap>>>  <'\*>  #. 


/^UNDEFINED  <undefined>,  a distinguished  value. 

#TRUE  <true> 

//FALSE  <false> 

//NILSEQ  The  empty  sequence  , <nilseq> 

\ a \ The  sequence  containing  the  single  element,  3. 

\ a1 , ...  ,an  \ 

The  sequence  containing  n elements,  whose  i-th 
element  is  ai . 

[This  is  equivalent  to 

"\a1\  #CS  ...  #CS  \an\”  .] 
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#DF  String-constant 

=>  <String>  #. 

#DF  String 

=>  <*[']'>  <$<String-character>>  <'[']’> 

=>  <’#SPACE’> 

=>  <'#NIL’>  #. 

#DF  String-character 

=>  <Printing-ascii-character>  #S-  <’[']'  , ’[[]*> 
=>  <'[[]'>  <Escape-sequence>  <’]’>  #. 

#DF  Escape-sequence 


i 

=> 

•ENQ'  , 

•FF*,  'DCS',  'SUB* 

! 

1 

'[[]*, 

'ACK'  , 

•CR*,  'ESC* 

1 

’NUL* , 

•BEL'  , 

•SO',  'NAK',  'PS', 

1 , ■ 

•SOH' , 

•BS'  , 

•SI*  'SYN',  'OS', 

i 

i 

'SIX' , 

•HT'  , 

•DLE*,  'ETB',  'RS', 

1 

•ETX' , 

•LF'  , 

•DCI*,  'CAN',  'US', 

•EOT* , 

•VT*  , 

*DC2',  'EM*,  •DEL'> 

#DF  Printing-ascii-character 

i 

=> 

<#LETTER> 

i 

1 

= > 

<#DIGIT> 

i 

=> 

<#SPACE, 

’!•, 

•#’, 

•4*. 

, •(*,  ’+ 

i 

1 1 
» » 

1 

1 1 I / » 1 . 1 1 . • 

• » ' t • » » » 

1 

1 

t - t 
“ » 

•>',  •?',  •§',  '[[] 
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i\i  Ilf  t''i  f_f  I'l 

'|J>  » » flf 


The  string  "x”.  The  string  constant,  like  every 
other  SEMAN0L(76)  <Symbol>,  is  indivisible;  that 
is,  the  evaluation  of  a string  constant  is  direct 
and  cannot  be  the  composition  of  any  other 
evaluative  steps.  In  particular,  if  " ’a’  ” is  a 
string  constant  appearing  in  an  expression  in  a 
semantic  definition  which  has  a formal  parameter 
named  "a”,  the  value  of  the  string  constant  is 
the  string  "a",  not  the  value  of  the  actual 
argument  associated  with  the  formal  parameter. 

A special  notation  is  used  to  represent 
non-printing  ASCII  characters,  and  imbedded 
single-quotes  within  a quoted  string.  The  square 
bracket  characters  are  used  to  enclose  the 
standard  ASCII  name  of  the  non-printing 
character.  For  example,  '[CR][LF]'  denotes  the 
string  of  two  characters  — ASCII  carriage-return 
followed  by  ASCII  line-feed.  The  same  square 
brackets  enclose  the  single-quote  character.  For 
example,  denotes  the  string  consisting  of 

the  ASCII  single-quote  character.  Finally,  it  is 
necessary  to  use  the  special  bracket  notation  to 
represent  the  character,  since  that  character 
normally  serves  as  an  "escape"  character  for  this 
notation.  Thus,  '[[]'  denotes  the  single  "[" 
character;  '[[]HI]’  denotes  the  string  "[HI]". 

Note  that  the  ASCII  line-feed  character  itself  (for  example) 
cannot  appear  in  a string,  only  the  characters 
[LF],  which  stand  for  the  line-feed.  Thus  the 
SEMAN0L(76)  end-of-line  character  cannot  appear 
in  a string;  that  is,  string  constants  cannot  be 
split  across  lines. 

#SPACE  The  string  consisting  solely  of  ASCII  space  or 

blank  character. 

#NIL  The  empty  string  <nil>. 
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#DF  Numeric-constant 

=>  <Integer-constant> 

=>  <Bit-string-constant>  #. 

#DF  Integer-constant 

=>  <Integer> 

=>  <Octal-integer>  <'#B8'> 

=>  <Binary-integer>  <’#B2'> 

=>  <'-'>  <Integer> 

=>  <•-’>  <Octal-integer>  <’#B8’> 
=>  <'-•>  <Binary-integer>  <’#B2'> 

#DF  Integer 

= > <$1<#DIGIT»  #. 

#DF  Binary-integer 

r>  OK'O'  1'>>  #. 

#DF  Octal-integer 

#DF  Bit-string-constant 

=>  <Binary-integer>  <*#BITS’>  #. 

I . 

i XX;::X 

I 


f 


7'>>  #. 
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XX: : :X#B8 
XX: : :X#B2 

Each  integer  numeral  constant  evaluates  to  itself 
as  a SEMAN0L(76)  string  object. 

The  integer  portion,  "XX:::X”,  may  be  any  string 
of  decimal  digits,  if  there  is  no  base  suffix  ( 
or  octal  digits  if  the  base  suffix  is  "#88”;  or 
binary  digits  if  the  base  suffix  is  no 

imbedded  blanks  are  permitted. 

XX: : :X#BITS 


Each  bit-string  constant  evaluates  to  itself  as  a 
string  object. 

The  integer  portion,  "XX:::X",  may  be  any  string 
of  binary  digits  (with  no  imbedded  blanks). 


tt 


Basic  Symbols 


If 


#DF  Comma 


=>  <’ , '> 

=>  <»#, *>  <Name>  #. 


#, commentary-characters 


The  SEMAN0L(76)  comma  may  include  some  optional 
commentary  characters  for  readability.  WARNING: 
the  use  of  "#,”  must  always  be  immediately 
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followed  by  noise  characters,  with  no  gap  and  no 
imbedded  blanks.  There  is  some  danger  that  the 
SEMAN0L(76)  programmer  may  forget  the  noise 
characters  and/or  their  terminating  blank,  thus 
erroneously  consuming  the  next  name  as  noise.  For 
example,  the  definition  reference  "blah(a#,b)"  is 
erroneous . 


#DF  Comment 


= > <"">  <%  <#ASCII  #S-  <""»>  <"">  #. 


" blah  •* 


A SEMAN0L(76)  comment  may  appear  in  any  gap  in  a 
SEMAN0L(76)  program.  It  is  ignored  during 
execution  of  the  SEMANOL(76)  program.  The  first 
occurrence  of  a double-quote  after  the  opening 
double-quote  terminates  the  comment. 


#DF  gap 


=>  <#GAP> 


=>  <#GAP>  <Special-delimiters>  <#GAP>  #. 


#DF  Special-delimiters 


=>  <Special-delimiter> 
<>1<<#GAP><Special-delimiter>>>  #. 


#DF  Special-delimiter 


=>  <Comment>  #U  <End-of  line>  #. 


#DF  End-of-line 


=>  <'[LF]'>  #. 
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The  character  '[LF]'  partitions  the  SEMANOL(76) 
program  into  a sequence  of  "lines",  which  are 
substrings  over  the  alphabet  <#ASCI1>  #S- 
<*CLF]’>.  No  line  may  be  greater  than  72 
characters  in  length. 


#DF  Name 


= > <#LETTER>  <%«#LETTER>  #U  <#DIGIT>  #U  <’-'»> 

#. 


The  possible  meanings  of  names  depend  upon 
context.  Some  rules  concerning  names  are  given 
in  Section  E of  Chapter  II. 
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Appendix  A 

The  followlnj^  paragraphs  are  given  to  fill  In  t^)ie  details 
of  the  SEMAN0L(76)  Implementation  of  the  notions  of  grammars, 
derivations,  derivation-  and  parse-trees,  syntactic  components 
(but  also  see  Chapter  II),  and  the  string  of  terminals  of  any 
node  of  a parse  tree. 

-fieclYatlQPS 

The  derivation  of  a string,  s,  from  the  "start-symbol",  S, 
of  a grammar,  G(S),  can  best  be  explained  by  an  example. 

De£lDiU<?n  nuaber) 


#DF  S =>  <T>  <Jl1<<»  + »>  <T»>  #.  (1) 

#DF  T 

=>  <V>  (t) 

s>  <V>  <•*’>  <T>  #.  (2) 

#DF  V 

= > <#CAP>  <$<#CAP  #U  #DIGIT»  #.  (1) 


Fig.  A.1.  Fxaraple  grammar  (with  start  symbol  S). 


Step  (a):  To  begin,  rewrite  the  grammar  so  that  all 
syntactic  class  names  are  bracketed  (G(S)  Is  In  this  form). 
Then  write  the  start-symbol,  bracketed. 

Step  (b);  Then  we  perform  a direct-derivation . by  (1) 
choosing  a bracketed  Syntactic  class  name  In  the  current 
string;  (2)  choosing  a deflnlens  In  the  Syntactic  definition 
which  defines  that  Syntactic  class  name;  and  (3)  replacing  the 
bracketed  Syntactic  class  name  with  the  chosen  deflnlens.  If 
the  deflnlens  Is  a syntactic  expression  of  the  form  "a  #S-  < 
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b1,  bn  >",  then  bracket  It  before  performing  the 

replacement.  At  step  (b),  there  are  no  choices,  so  we  perform 
the  only  possible  direct-derivation.  We  also  record  the 

* (Syntactic  class  name;  definiens  number)  pair  used  to  make  the 

! derivation. 

I Step  (c) ; After  performing  each  direct-derivation,  we 

I check  for  spontaneous-derivations . which  must  be  performed  if 

I ' there  are  any  occurrences  of  the  #U,  $,  or  $1  operators. 

[ , Corresponding  to  each  occurrence  of  such  an  operator,  0,  is  an 

"O-induced"  spontaneous-derivation.  (If  any  derivation 

contains  more  than  one  such  operator  occurrence,  they  may  be 
nested  by  the  parenthesizing  brackets;  in  that  case  the  induced 
spontaneous  derivations  are  done  "from  the  outside  inward".) 
At  step  (c),  a %1-induced  spontaneous  derivatiop  is  performed. 
Where  the  expression  <5(1<a>>  appears,  we  choose  a positive 
integer,  n,  and  replace  the  expression  with  n occurrences  of 
<a>;  at  step  (c),  n=1. 

Spontaneous  derivations  must  be  performed  in  left  to  right 
order  (unless  the  inducing  operators  are  nested),  and  all 
inducing  operators  must  be  eliminated  before  proceeding  to  the 
next  direct-derivation.  When  all  such  operators  have  been 
eliminated  the  direct-derivation  and  the  subsequent  chain  of 
spontaneous  derivations  (if  any)  constitute  a complete 
derivation  step.  Thus  steps  (b  & c)  constitute  a complete 

derivation  step. 

Step  (d);  Perform  a direct  derivation,  replacing  the 

second  occurrence  of  <T>  with  its  second  definiens,  <V>  <'•'> 
<T>.  Since  this  derivation  Introduces  none  of  the  inducing 
operators,  this  is  a complete  derivation  step. 

Step  (e);  Replace  the  first  occurrence  of  <T>  with  its 

first  definiens,  <V>.  Complete  derivation  step. 

Step  (f);  Replace  the  first  occurrence  of  <V>  with  its 

only  definiens.  This  Introduces  two  (nested)  inducing 
operators,  % and  #U.  Thus  we  are  forced  to  perform  a $-induced 
spontaneous  derivation,  followed  by  a #U-lnduced  spontaneous 
derivation : 
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(a)  <S> 

I 

i(S;1) 

V 

(b)  <T><$1<<'  + '><T»> 

I 

i(?i) 

V 

(c)  <T><’+'><T> 

I 

!(T;2) 

V 

(d)  <T><'+’><V><’«’><T> 

!(T;1) 

V 

(e)  <V><'+'><V><'»><T> 

I 

!(V;1) 

V 

(f)  <#CAP><$<#CAP  #U  #DIGIT»<'  + '><V><'«'><T> 

I 

!(%) 

V 

(g)  <#CAP><#CAP  #U  #DIGIT><#CAP  #U  #DIGIT><  ' + ' XVX  * • ' ><T> 


Fig.  A. 2.  Derivation  of  String  SI  (part  1) 
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(g)  <#CAP><#CAP  #U  #DIGIT><#CAP  #U  (IfDIGITX  ' +XVX  ' » ’ ><T> 


(h) 


(i) 


(j) 


I (#U(twice) ) 

V 

<#CAPX#DIGITX#DIGITX'  + ' XVX  •»’XT> 

I 

i(V;1) 

V 

<#CAPX#DIGITX#DIGITX’  + ' X#CAPXJ<#CAP  #U  #DIGIT>> 

I <'»’XT> 

!(J) 

V 

<#CAPXC/DIGITX#DIGITX’  + * X#CAPX'»'XT> 

I 

I 


1(T;1) 


(k)  <#CAPX#DIGITX#DIGITX*  + ' X#CAPX'»'XV> 


(1) 

(m) 

(n) 


I 

! (V;  1) 

V 

<#CAPX#DIGITX#DIGITX  ' + ' X#CAPX  ' » ' X#CAP> 

I <%<#CAP#U#DIGIT>> 

!(X) 

V 

<#CAP>  <#DIGIT>  <#DIGIT>  <’  + ’>  <#CAPX  ’ » ’ X#CAP> 


I 

I 

V 

A 


I 

I 

V 

1 


I 

1 

V 

2 


I 

V 

+ 


I 

V 

B 


V 

« 


I 

V 

C 


= string  SI 


Fig.  A. 2.  Derivation  of  String  si  (part  2) 


|| 


Step  (g):  If  the  expression  <%<a>>  appears,  we  choose  a 
non-negative  integer  n and  replace  the  expression  by  n 
occurrences  of  <a>;  here  n = 2.  This  is  a i^-induced 
spontaneous  derivation. 

Step  (h);  If  any  of  the  expressions  <a1  #U  a2>  ,...,  <a1 
#U...#U  an>  appear,  choose  a positive  integer  n (<=n)  and 
replace  the  expression  with  <am>.  Here  (n  = 2 is  chosen  twice, 
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and  two  #U-lnduced  spontaneous  derivations  are  performed.  | 

There  are  no  inducing  operators  left.  Thus  steps  (f-h) 
constitute  a complete  derivation  step.  I 


Steps  (i  thru  m):  Proceed  as  discussed  above,  until  there 
are  no  more  Syntactic  class  names  and  no  more  inducing 
operators  in  the  most  recent  string.  All  bracketed  expressions 
will  contain  Syntactic  set  constants.  This  condition  is  known 
as  derivation  up  to  terminal  nodes. 


Step  (n):  The  terminal  derivation  is  performed  by 

selecting  a string  from  the  set  denoted  by  each  Syntactic  Set 
Constant  and  replacing  the  corresponding  Set  Constant  with  its 
string. 

Our  derivation  is  complete. 

Note  that  what  we  have  done  here  is  to  describe  a method 
for  producing  members  of  the  set  denoted  by  the  start-symbol. 

The  strings  constructed  in  any  derivation  (e.g.,  that  of 
Fig.  A. 2)  are  called  sentential  forms . Each  lettered  line  of 
Fig.  A. 2 is  a sentential  form.  Only  the  last  sentential  form 
in  a derivation  is  in  the  language  generated  by  the 
start-symbol.  Sentential-forms  which  contain  any  of  the 
inducing  operators,  %,  $1,  or  #U,  are  called  t^emporarv  forms. 
The  rest  are  called  permanent  forms . 

There  are  some  special  amendments  to  and  constraints  upon 
the  terminal  derivation: 

(1)  #S- 

Suppose  the  grammar  of  the  above  example  had  the  following 
syntactic  definition  for  "V”  rather  than  the  one  give  above: 

V =>  <#CAP>  <%  <#CAP  #U  #DIGIT>>  #S-  <'A12*> 

(This  says  that  no  derivation  may  produce  "A12"  from  the 
syntactic  class  V).  If  the  sample  derivation  were  repeated  with 
the  amended  grammar,  the  sentential  form  at  line  (m)  would  be: 

(m')  < <#CAP><#DIGIT><#DIGIT>  #S-  <'A;2'>> 

<'+'>  <<#CAP>  #S-  <»A12*>> 

<*«•>  «#CAP>  #S-  <'A12»>> 

There  are  five  ’’bracketed  components”  of  (m’): 
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(1)  «#CAP><#DIGIT><#DIGIT>#S-<'A12'>> 

(2)  <•+*> 

(3)  «#CAP>#S-<'A12'>> 

(4)  <••'> 

(5)  «#CAP>#S-<'A12*>> 

Bracketed  components  (1),  (3)f  and  (5)  are  said  to  be  "#S- 

conditioned” ; the  selection  of  strings  from  the  syntactic  set 
constants  in  each  bracketed  component  must  be  such  that  the 
resultant  "component  string"  is  not  among  those  listed  in  the 
#S-  condition  (the  set  of  strings  following  the  "#S-"). 

For  example,  the  string  SI  of  Fig.  A. 2 would  no  loneer  be 
derivable  from  S.  since  "A12"  is  specificallv  excluded  from 
syntactic  class  "V".  However  the  string  "A13+B*C"  is  derivable 
from  either  the  orieinal  or  the  modified  trrammar. 

2.  Some  Special  Cases 

Define  the  relation  "dlrectlv-derives"  or  ->  as  follows:  A 
->  B if  and  only  if  A and  B are  oermanent  forms  and  there  is  a 
single  comolete  derivation  step  (or  a terminal  derivation) 
which  (given  A)  will  produce  B.  This  relation  is  understood  to 
be  relative  to  the  particular  grammar  eiven  in  a particular 
Context  Free  Svntax  Section;  also  if  a denotes  A and  b denotes 

B and  A ->  B then  we  sav  a ->  b.  For  example,  in  Fig.  A. 2.  (a) 

->  (c);  (c)  ->  (d);  (d)  ->  (e):  (e)  ->  (h):  (h)  ->  (1):  (.i)  -> 

(k):  (k)  ->  (m);  and  (m)  ->  (n).  No  other  pairs  of  line 

letters  are  in  the  relation. 

Define  the  relation  "derives"  or  •->  as  the  transitive 
closure  of  ->;  that  is  A •->  B if  and  onlv  if  A ->  B or  there 

exist  oermanent  forms  a1.  a2.  a3 an  such  that  A ->  ai  -> 

a2...->  an  ->  B.  (Also,  if  a denotes  A and  b denotes  B and  A 
*->  B.  then  a •->  b). 

Thus  in  Fig.  A. 2.,  <S>  •->  "A12+B*C"  or  ecuivalentlv  (a) 
*->  fn);  also  (a)  •->  (h);  (d)  *->  (k);  etc. 

Let  "right  (c)"  denote  the  right-most  character  of  the 
string  c (if  c is  not  the  empty  word:  and  c otherwise).  Let 

"left  (c)"  be  defined  svmmetricallv . 

If  S is  the  start-svmbol  of  a grammar  of  the  context  free 
svntax  section,  and 
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(1) 

<S>  •->  ABC  •- 

> abc  ; 

(2) 

A »->a;  B »->b;  C 

•->c;  and 

CASE  1 

(3) 

B is  "<#DECNUM>" 

or 

B is  ''<^NAT-NOS>" 

then  left(c)  may  not  be  an  ASCII  digit  (from  the  set  named 
#DIGIT). 

CASE  2 

(3)  B is  *'<#GAP>" 

then  left(c)  may  not  be  an  ASCII  blank  character;  and  b may  be 
<nil>  only  if  right(a)  and  left(c)  are  not  both  ASCII 
alphanumeric  characters. 

As  an  example  of  the  #GAP  case,  recall  the  definition  of 
n-place  set  concatenation,  specified  in  SEMANOl.(76)  by 
<b1><b2>. . .<bn>,  where  the  bi  are  syntactic  expressions 
denoting  sets  of  strings.  The  SEMANOL(76)  constant 
<b 1 ><b2> . . . <bn>  denotes  the  set  of  strings  A={  a : 
a = ''a1a2. . .an"  and-"a1"  is  in  BI;  "a2"  is  in  B2 ; . . . ; "an"  is  in 
Bn} . 

Normally,  if  the  empty  string  <nil>  is  in  Bi  (1<i<n)  then  A 
contains 

a=a 1a2. . . a ( i- 1 ) <nil>a ( i+ 1 ) . . .an 


= a1a2. . .a(i-1 )a(i+1 ) . . .an. 

However,  supoose  that  bi  is  the  syntactic  expression  #GAP. 
Then  A contains  a = a1a2 . . . a( i- 1 ) <nil>a ( 1+ 1 ) . . . an  if  and  only 
if  right  (a1a2. . .a(i-1 ) ) is  not  alphanumeric  or  left 
(a(i+1 ) . . .an)  is  not  alphanumeric. 

3.  Ambiguity 

A grammar  in  the  context  free  syntax  section  is  ambiguous 
if  there  exist  two  different  derivations  for  any  string  in  the 
language  of  the  grammar.  A grammar,  G(S),  is  ambiguous  with 


105 


SEMAN0L(76)  Reference  Manual 
Appendix  A 


r 


t 


i 

I 


i 

I 

I 

I 


I 

I 


respect  to  a particular  string  if  there  exist  two  different 
derivations  for  that  string  from  the  start  symbol  S of  the 
grammar. 

If  the  expression  "#CONTEXT-FREE-PARSE-TREE(S,p)"  is 
evaluated,  where  G(S)  is  ambiguous  with  respect  to  the  string 
value  of  p,  the  result  is  <error>,  as  described  above. 

4.  Derivation  and  Parse  Trees 

From  the  list  of  derivations  in  Fig.  A. 2 we  can  construct  a 
tree  representation  of  the  derivation  process.  Fig.  A. 3 shows 
the  first  three  steps  in  the  construction  of  such  a derivation 
tree . 


Note  that  only  the  permanent  forms  (a),  (c),  (d),  (e),  (h), 
(j),  (k),  (m),  and  (n)  are  reflected  in  the  construction  of  the 
derivation  tree  (although  the  ’’definiens  number"  of  each  direct 
derivation  is  also  recorded).  Each  addition  to  the  derivation 
tree  (begun  in  Fig.  A. 3 (a))  corresponds  to  a complete 
derivation  step  in  the  derivation  of  Fig.  A. 2. 

Step  (a).  The  "parent"  or  "root"  node  is  labeled  with  the 
start-symbol . 

Steps  (b-c).  The  "Immediate  descendent"  nodes  of  any 
parent  are  labeled  with  the  syntactic  class  names  obtained  from 
the  parent  by  a complete  derivation  step.  The  "definiens 
number"  used  in  the  direct  derivation  (for  that  step)  is 
appended  to  the  parent  node's  label. 

Step  (d).  The  process  is  repeated  for  the  next  complete 
derivation  step.  Fig.  A. 4 shows  the  derivation  tree  "up  to 
terminal  nodes". 

The  Interpreter  uses  the  Context-Free  Syntax  Section  to 
recognize  programs  rather  than  to  generate  them.  However,  in 
the  recognition  process,  a parse  tree  is  formed  whose  basic 
structure  is  that  of  the  derivation  tree. 

In  terms  of  parsing  a given  string  the  following 
interpretations  may  be  made  regarding  certain  derivation  rules 
given  above: 

1.  A substring  which  is  parsed  by  virtue  of  a definiens 
containing  the  operators  #U,  $,  or  Jl,  will  produce  a single 
level  in  the  subtree  corresponding  to  the  definiens  (i.e., 
Levels  are  added  to  the  parse  tree  only  for  explicitly  named 
syntactic  classes;  put  another  way,  temporary  forms  are  not 
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reflected  In  the  parse  tree). 

2.  The  special  case  Syntactic  set  constants  iDECNUM  and 
#NAT-NOS  which  are  used  to  parse  a a substring  ai...an  will 
"consume"  all  the  consecutive  numeric  digits  of  that  portion  of 
the  overall  string  being  parsed  (i.e.,  character  a(n+1)  will 
never  be  an  ASCII  digit).  Similary,  if  #GAP  is  used  to  parse 
"ai...an",  character  "a(n+1)"  will  never  be  an  ASCII  blank 
character.  Furthermore  "ai...an"  can  never  be  <nil>  if  both 
characters  "a(i-1)"  and  "a(n+1)"  are  alphanumeric. 
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5.  The  string  of  terminals _Q£_a_DQd^ 


Now  we  can  write  the  derived  string  by  tracing  the  tree  In 
"preorder”.  For  each  Immediate  descendent  dl  of  the  parent 
node  (<1=1,...>  in  left  to  right  order),  If  dl  Is  a terminal 
node  write  down  its  associated  string;  otherwise  trace  the 
subtree  of  dl,  using  dl  as  the  parent.  The  string  thus  written 
is  the  one  represented  by  the  derivation  tree. 


In  a similar  manner,  each  non-terminal  node  corresponds  jto 
a particular  (sub)strlng  occurrence  of  the  derived  string.  See 
Fig.  A.^:  the  first  descendent  of  the  parent  node  can 
represent  the  initial  substring  "A12"  of  SI;  the  second 
descendent  of  the  parent  represents  the  substring  the 
third  represents  "B^C". 


Note  that  the  parse  tree  does  not  contain  the  strings  of 
terminals  themselves.  Every  node  and  the  string  of  terminals 
it  represents  are  separate  and  distinct;  one  can  obtain  the 
string  from  the  node  by  using  the  "#STRING-OF-TERMINALS-OF. . . " 
operator  as  described  above. 
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